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PREFACE 


The  work  covered  by  this  report  is  part  of  an  Urban  Mass 
Transportation  Administration  program  which  is  concerned  with  fuel 
conservation  in  urban  transit  buses.  The  program  is  based  on  the 
use  of  a systems  approach  to  develop  propulsion  design  concepts 
consistent  with  environmental,  safety,  operational  and  economic 
objectives.  This  document  reports  on  a Transportation  Systems 
Center  study  of  a f lywheel/diesel  hybrid  power  drive  concept  suit- 
able for  an  urban  transit  bus.  A primary  tool  of  the  investiga- 
tion was  a computer  simulation  model  developed  by  the  Center 
during  the  program  and  described  in  detail  in  this  report.  This 
model  should  be  useful  in  further  studies  of  flywheel/heat  engine 
analyses  for  vehicle  propulsion  application  over  various  drive 
cycles . 

The  authors  are  also  indebted  to  Alan  McDonald  of  Purdue 
University  for  helpful  comments  and  suggestions,  and  to  Detroit 
Diesel  Engine  personnel  for  valuable  information  regarding  diesel 
on-off  operation. 
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SUMMARY/  CONCLUSIONS/  AND  RECOMMENDATIONS 


The  Transportation  Systems  Center  has  evaluated,  as  part  of 
the  Urban  Mass  Transportation  Administration's  fuel  economy 
efforts,  the  practicality  of  a f lywheel/diesel  hybrid  power  drive 
concept  for  urban  transit  bus  propulsion.  A computer  simulation 
model  was  developed  as  the  major  tool  of  this  investigation. 

The  proposed  subsystem  is  a moderately  sized  diesel  engine  in 
series  with  a relatively  large  flywheel.  The  model  incorporated 
a friction  clutch  between  the  engine  and  the  flywheel  and  a 
continuously  variable  ratio  transmission  between  the  flywheel  and 
the  rear  axle  drive  wheels.  This  hybrid  configuration  shows  con- 
siderable promise  for  fuel  efficient  propulsion  of  urban  transit 
buses . 


The  f lywheel/diesel  power  drive  configuration,  with  the  on- 
off  engine  operating  mode,  is  projected  to  have  a reduction  in 
fuel  consumption  of  at  least  501  (in  gallons  per  mile)  below  the 
diesel-alone  fuel  consumption  for  urban  bus  driving  cycles  having 
more  than  4 stops  per  mile.  This  stems  from  the  following; 

o The  diesel  engine,  used  in  the  hybrid,  is  operated  (on- 
mode)  in  regions  of  minimum  specific  fuel  consumption 
during  a much  greater  portion  of  its  operating  time  than 
in  conventional  drives.  Also,  the  engine  is  not  operating 
(off-mode)  during  the  time  the  flywheel  has  sufficient 
stored  energy  to  power  the  transit  bus  over  a number  of 
driving  cycles.  Transients  in  fuel  consumption  are 
minimized  during  the  time  the  flywheel  is  used  as  an  over- 
size starter  in  starting  the  engine  up  (on-mode).  The 
on-off  engine  operation  mode  practically  eliminates  engine 
idling  which  is  a major  source  of  low  fuel  economy  during 
city  driving. 

o The  flywheel  power  drive  portion  of  the  hybrid  subsystem 
is  used  in  a regenerative  braking  mode  by  storing  the 
recoupped  vehicle  kinetic  energy  in  the  flywheel  during 
deceleration.  This  recouping  of  energy  is  appreciable 


IX 


during  the  multi-stop  operations  of  transit  buses.  The 
recoupped  energy  also  tends  to  increase  the  length  of  time 
the  diesel  engine  is  in  the  off-mode  condition.  This 
leads  to  additional  fuel  economy,  as  well  as  minimizing 
brake  wear . 

The  required  diesel  engine  in  this  application  can,  potentially, 
be  rated  at  a lower  horsepower  than  the  conventional  diesel  transit 
bus  engine,  leading  to  further  reductions  in  fuel  consumption  and 
weight . 

A number  of  developments  are  needed  to  achieve  an  acceptable 
hybrid  power  drive,  principally  in  the  areas  of  continuously 
variable  ratio  transmissions  (CVRT)  design,  improved  bearings,  and 
seal  effectiveness. 

RECOMMENDATIONS 

A system  design  of  a f lywheel/diesel  power  drive  (series 
configuration,  on-off  engine  operation  mode)  should  be  conducted 
encompassing  all  the  system  elements  in  order  to  optimize  the 
power  transfer  from  power  source  to  drive  wheels  with  respect  to 
minimizing  fuel  consumption  within  the  constraints  of  safety,  en- 
vironmental effects,  and  acceptable  driveability.  This  will  entail 
engineering  design  of  the  diesel  engine,  CVRT,  flywheel  and  gear 
train.  An  additional  study  should  include  life  cycle  cost 
analyses  of  tlie  overall  system  and  each  of  the  subsystems. 
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1.  INTRODUCTION 


This  report  describes  the  results  o£  a Transportation  Systems 
Center  investigation,  conducted  under  Urban  Mass  Transportation 
Administration  sponsorship,  o£  the  practicality  o£  a £lywheel/ 
diesel  hybrid  power  drive  £or  urban  transit  bus  propulsion.  A 
simulation  model,  developed  in  the  program,  was  the  major  tool 
used  in  the  investigation  and  is  described  in  detail  in  the 
report . 

1.1  BACKGROUND 

A £undamental  de£iciency  o£  the  current  urban  transit  bus 
diesel  engine  and  transmission  assembly  is  that  the  power  unit  is 
operated  much  o£  its  time  in  the  less- e££icient  regions  o£  its 
per£ormance  envelope.  During  urban  tra££ic  use  the  diesel  engines 
are  operated  in  an  intermittent  mode  or  duty  cycle,  characterized 
by  many  cycles  per  mile  consisting  o£  acceleration,  short  cruise, 
deceleration,  and  idle  segments.  During  the  acceleration  segment 
there  is  a large  speed  variation  as  well  as  a large  variation  in 
drive  power  required.  In  the  cruise  segment  the  speed  is  almost 
constant  with  su££icient  engine  power  development  to  account  £or 
the  air  drag  and  ground  rolling  £riction  losses.  During  decelera- 
tion, the  engine  provides  some  £orm  o£  braking  to  slow  the  bus 
vehicle.  The  idling  segment  is  the  most  ine££icient  o£  all  operat- 
ing modes  because  £uel  is  wasted  while  doing  no  use£ul  work.  The 
£uel  consumption  Tor  such  a duty  cycle  is  higher  than  desired. 

The  national  £uel  conservation  e££ort  has  brought  together 
the  voluntary  action  o£  manuTacturers  and  operators  to  promulgate 
£uel  e££icient  or  energy  saving  Teatures  Tor  truck  and  bus 
vehicles.  Typical  oT  these,  are  the  Tollowing: 

o Weight  reduction  options; 

o Aerodynamic  design  improvements  that  reduce  the  wind  and 
ground  eTTect  drag  oT  the  buses; 
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o 


Use  of  radial  ply  tires  that  reduce  rolling  resistance; 

o Redesign  of  diesel  engines  that  develop  rated  power  at 
reduced  engine  speeds; 

o Use  of  turbochargers  that  improve  the  efficiency  of  diese 
engines ; 

o Demand  actuated  fan  clutches  that  disengage  the  engine 
cooling  fan  when  it  is  not  needed. 

Case  studies  of  major  trucking  operators  reveal  fuel  savings 
ranging  from  15  to  20%  through  the  use  of  the  above  measures 
(References  (1) , (2) . Similar  fuel  savings  ranging  from  10  to 
15%  may  be  estimated  for  the  bus  operators. 

Additional  fuel  savings  would  be  attainable  with  effective 
energy  management  and  matching  of  the  diesel  engine  to  its  duty 
cycle.  This  suggests  that  there  are  a number  of  potentials  which 
can  be  considered  for  reducing  urban  bus  fuel  consumption.  One 
potential  is  in  the  use  of  a Continuously  Variable  Ratio  Power 
Drive  Transmission  (CVRT)  concept  which  is  capable  of  sustaining 
the  diesel  engine  operation  within  its  optimum  performance 
envelope.  A simulation  study  of  such  an  approach  has  predicted 
that  the  use  of  an  available  CVRT  in  a present  day  urban  bus 
would  increase  the  bus  fuel  economy  (in  mpg)  by  as  much  as  30%.* 

More  improvement  in  fuel  economy  can  be  achieved  with  the 
alternate  approach  of  using  a hybrid  power  drive  concept  which 
will  support  deceleration  energy  recovery  along  with  optimum 
engine  operation. 


*H.  Zuckerberg , "Performance  Characteristics  of  a Diesel  Powered 
Urban  Bus  Equipped  with  Sundstrand  Hydromechanical  Transmission," 
material  on  file  with  Kentron  Hawaii,  Limited,  Transportation  Sys 
terns  Center,  55  Broadway,  Cambridge  02142. 
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STUDY  APPROACH 


The  objective  o£  this  study  was  to  determine  the  potential 
o£  a £lywheel/diesel  power  drive  concept  £or  urban  transit  bus 

propulsion.  The  approach  taken  to  meet  the  objective  was  in 
accordance  with  the  hollowing  tasks: 

1.  Provide  inhormation  showing  the  potential  viability  o£ 
hlywheel  hybrid  power  drives  £or  bus  propulsion. 

2.  Estimate  the  improvement  in  £uel  economy  that  could  be 
achieved  through  use  o£  hlywheel  hybrid  propulsion. 

3.  Identity  the  problem  areas  which  will  be  encountered 
in  the  development  o£  hlywheel  hybrid  power  drives. 

4.  Delineate  the  initial  phases  necessary  £or  an  urban 
bus  hlywheel  hybrid  propulsion  system  development. 

These  tasks  were  perhormed  within  the  hollowing  guidelines: 

1.  Engines  designed  to  operate  at  peak  ehhiciency; 

2.  Power  transmissions  designed  hor  compatibility  with  peak 
engine  ehhiciency; 

3.  Accessory  power  drives  designed  hor  compatibility  with 
peak  ehhiciency. 

The  most  signihicant  characteristic  oh  the  proposed  hlywheel/ 
diesel  power  drive  subsystem  is  a moderately  sized  engine  in 
series  with  a relatively  large  hlywheel.  The  interhaces  between 
the  engine  and  hlywheel  and  between  hlywheel  and  rear  axle  drive 
wheels,  are  CVRTs  and  possibly  hluid  clutches.  The  use  oh  CRVTs 
with  hlywheel/diesel  hybrids  permits  the  combining  oh  the  best 
heatures  oh  the  hlywheel  and  the  diesel  to  provide  an  attractive 
transit  bus  power  drive  subsystem. 

Many  "hotel"  accessories  (air  conditioning,  heating  and 
ventilating)  can  provide  optimum  output  within  their  peak  ehhi- 
ciency regime  when  operated  at  near  constant  input  speed.  Within 
the  time  hrame  projected  hor  the  development  oh  a prototype  bus 
vehicle  concept,  (i.e.,  1985),  it  is  likely  that  an  optimized 
package  oh  "hotel"  accessories  having  a constant  input  speed 


1-3 


specification  will  be  available  for  operation  off  the  hybrid 
'power  drive  or  off  a separate  power  source. 

Because  of  the  uncertainty  in  the  characteristics  of  future 
''hotel''  loads,  comparisons  between  hybrid  propulsion  and  standard 
diesel  propulsion  in  this  report  are  made  on  the  basis  of  no  air 
conditioning,  heating  or  ventilation. 


( 
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2.  HYBRID  SYSTEM  CONSIDERATIONS 


2.1  HYBRID  SYSTEM  SELECTION 

In  configuring  a heat  engine  hybrid  power  drive,  four  major 
selections  must  be  made: 

Type  of  engine 

Power  drive  configuration  (series  or  parallel) 

Type  of  energy  storage 

Operation  mode  of  the  engine 
A discussion  of  these  follows. 

The  diesel  was  chosen  as  the  heat  engine  for  this  study 
because  of  its  demonstrated  superiority  to  other  available  engines 
in  the  areas  of  maintenance  and  fuel  economy.  Other  engines  such 
as  the  gas  turbine  or  the  Stirling  may  prove  superior  to  the 
diesel  at  a later  date  when  they  are  developed  for  bus  operation. 


Hybrid  power  drive  configurations  are  often  grouped  into  two 
broad  classes,  series  and  parallel,  as  illustrated  in  Figure  2-1. 

In  the  series  configuration,  the  energy  passes  directly  through 
the  various  energy  conversion  and  energy  storage  devices  as  it 
flows  from  the  prime  source  to  the  drive  wheels.  This  permits 
a wide  latitude  in  the  degree  of  prime  source  decoupling  from  the 
drive  wheels,  which  results  in  greater  flexibility  of  diesel 
engine  operation.  In  the  parallel  configuration  of  hybrids,  the 
energy  flow  still  has  a path  through  energy  conversion  and  storage 
devices  but  there  is  also  a (parallel)  path  of  mechanical  power 
transmission  to  the  drive  wheels.  The  decoupling  potential  is  less 
than  in  the  series  configuration,  which  limits  the  engine  flexi- 
bility. However,  the  transmission  losses  in  the  mechnical  drive 
path  can  be  lower  than  those  in  the  series  configuration.  Although 
the  size  and  weight  of  some  of  the  components  can  be  less  in 
parallel  hybrid  configurations  there  are  more  components. 

The  series  configuration  was  selected  because,  having  less 
components  it  is  less  complex  than  the  parallel.  In  addition,  the 


2-1 


A.  SERIES  CONFIGURATION 

(i)  PRIME  ENERGY  SOURCE/FLYHHEEL  HYBRID 


(ii)  PRIME  ENERGY  SOURCE/BATTERY  HYBRID 


B.  PARALLEL  CONFIGURATION 

(i)  PRIME  ENERGY  SOURCE/FLYWHEEL  HYBRID 


(ii)  PRIME  ENERGY  SOURCE/BATTERY  HYBRID 


FIGURE  2-1.  SCHEMATIC  DIAGRAM  OF  HYBRID  POWER  DRIVE  SUBSYSTEMS 
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particular  series  configuration  chosen  is  more  fuel  efficient  than 
a parallel  configuration  and  allows  on-off  operation  of  the  diesel 
engine,  whereas  the  parallel  configuration  requires  essentially 
continuous  operation. 

Continuous,  constant  speed  operation  of  the  heat  engine  is 
attractive  because  it  provides  the  possibility  of  finding  the  best 
operating  engine  speed  to  minimize  fuel  consumption  and/or  ex- 
haust emissions.  However,  a particular  setting  of  constant  speed 
operation  is  only  applicable  to  a particular  phase  of  a driving 
cycle.  Because  of  this,  the  heat  engine  is  sized  to  meet  the 
maximum  power  requirement  for  the  continuous  operational  mode,  and 
the  speed-power  operation  is  adjusted  to  meet  the  lower  power  levels 
as  required.  The  energy  savings,  if  any,  that  are  realized  by  this 
method  of  control,  stem  from  the  slow  variations  in  engine  speeds 
that  are  possible.  The  design  challenge  is  to  configure  the  control 
system  so  that  the  engine  speed  and  power  changes  take  place  in 
such  a manner  that  no  vehicle  acceleration  demands  are  imposed 
upon  the  eng ine  . 

Another  engine  operational  mode  is  possible  in  which  the 
engine  is  turned  on  and  off  in  response  to  the  state -of -charge  of 
the  energy  storage  device.  The  energy  storage  device  discharges 
as  energy  is  extracted  for  propulsion.  When  the  energy  storage 
device  has  been  discharged  to  its  minimum  operational  level,  the 
heat  engine  is  turned  on  to  charge  it  up.  When  the  storage 
device  reaches  its  maximum  charge  limit,  the  heat  engine  is  turned 
off  and  disengaged.  This  on-off  operation  of  the  heat  engine 
allows  for  essentially  complete  decoupling  of  the  engine  from  the 
wheel  loads  and,  therefore,  minimum  fuel  consumption.  For  this 
reason,  the  on-off  operation  of  the  heat  engine  was  chosen. 

Energy  can  be  stored  in  batteries,  flywheels  and  hydraulic 
accumulators.  A state-of-the-art  review  of  these  methods 
determined  that  only  flywheels  could  be  characterized  well  enough 
to  be  accurately  modeled  in  a simulation  program.  In  addition, 
flywheels  are  superior  to  the  others  in  charge  and  discharge  power 
densities  and  in  cycle  life. 
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A functional  diagram  of  the  selected  hybrid  power  drive 
-system  is  shown  in  Figure  2-2.  This  particular  type  of  hybrid 
drive  subsystem  has  not  received  extensive  attention  in  prior 
studies.  Only  two  previous  studies  and  experimental  trials  are 
related.  These  are  described  in  References  3 and  4.  In  this 
concept  the  f lywheel/diesel  hybrid  drive  train  is  dominated  by 
the  flywheel.  The  diesel  engine  is  used  only  to  charge  up  the 
flywheel.  In  terms  of  performance  (acceleration,  cruising  speed 
and  energy  economy) , the  proposed  subsystem  can  be  a satisfactory 
substitute  for  currently  manufactured  transit  bus  power  drive 
train  subsystems.  The  flywheel  can  provide  high  power  density 
levels  to  propel  vehicles  at  the  desired  speeds  and  accelera- 
tions. With  a bilateral  transmission,  a flywheel  assembly  can 
store  vehicle  kinetic  energy  developed  during  the  deceleration 
phase  which  can  be  used  during  the  next  acceleration  phase, 
thereby  increasing  the  energy  efficiency  of  the  transit  bus.  In 
addition,  the  proposed  systems  should  have  the  operating  life 
compatible  with  service-life  requirements  of  the  complete  bus 
vehicle  drive  system. 


2.2  HYBRID  POWER  DRIVE  OPERATION  MODES 


The  proposed  vehicle  drive  subsystem  is  shown  schematically 
in  Figure  2-2.  The  diesel  engine  is  used  primarily  to  charge  the 
flywheel,  when  required.  Power  is  supplied  to  the  flywheel 
through  a Continuously  Variable  Ratio  Transmission  (CVRT)  which 
adjusts  its  ratio  automatically  to  maintain  the  engine  operation 
at  its  best  power-speed  profile  while  the  flywheel  speed  varies 
between  its  minimum  and  maximum  values.  Figure  2-3  illustrates 
the  optimum  power-speed  profile  for  a typical  bus  diesel  engine. 


Other  modes  of  operation  for  the  hybrid  concept  are  illus- 
trated in  Figure  2-4.  When  the  flywheel  is  fully  charged,  the 
engine  is  automatically  turned  off.  Later,  when  the  energy  in 
the  flywheel  reaches  a specified  lower  threshold  level,  the 
engine  is  started  up  by  the  flywheel.  Once  turned  on,  the  engine 
brings  the  flywheel  to  full  charge. 
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NOTE:  This  CVRT  is  not  included 

in  the  simulation  study. 


DIESEL 

ENGINE 


CONTINUOUSLY 

VARIABLE 

TRANSMISSION 


FLYWHEEL 


FIGURE  2-2.  SELECTED  HYBRID  POWER  DRIVE  - SERIES  CONFIGU- 
RATION - ON-OFF  ENGINE  OPERATION 
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2-6 


A 


POWER  DRIVE  SUBSYSTEM  STARTUP 


ENGINE  CHARGING  UP  FLYWHEEL 


C - POWER  DRIVE  SUBSYSTEM  - DECELERATION  OPERATION 


Note:  For  the  simulation  program  the  CVRT  between  the  engine  and  the 

clutch  was  not  included. 


FIGURE  2-4.  FLYWHEEL/DIESEL  HYBRID  POWER 
DRIVE  MODE  OF  OPERATION 
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Another  CVRT  with  reversing  capabilities  is  used  for  trans- 
mitting power  to  the  drive  wheels  from  the  flywheel.  The  need 
for  a CVRT  between  the  flywheel  and  the  drive  wheels  is  emphasized 
by  the  incompatibility  of  the  flywheel  and  vehicle  speed  regimes. 
For  example,  at  vehicle  standstill,  after  charging,  the  flywheel 
speed  is  maximum  while  the  vehicle  speed  is  zero.  As  the  urban 
bus  begins  to  accelerate,  the  flywheel  slows  down.  During  the 
cruising  phase  with  the  bus  travelling  at  steady  speed,  the  fly- 
wheel gradually  slows  down  due  to  the  extraction  of  energy. 

During  the  deceleration  phase,  as  the  vehicle  slows  down,  the  fly- 
wheel speeds  up  because  of  the  kinetic  energy  imparted  to  it. 

The  engine  can  be  operated  without  CVRT  coupling  to  the  fly- 
wheel. In  this  case,  a clutch  must  be  used  and  the  engine  opera- 
tion will  not  be  optimal,  resulting  in  higher  fuel  consumption. 

To  establish  which  approach  is  better,  a trade-off  analysis 
between  the  clutch  and  CVRT  must  be  made,  considering  maintenance 
costs  and  power  drive  efficiency. 

2.3  PRELIMINARY  ENGINEERING  ASSESSMENT  OF  THE  FLYWHEEL/DIESEL 

HYBRID  CONCEPT 

The  purpose  of  this  section  is  to  document  the  development 
of  a "proof  of  principle"  engineering  assessment  method  for 
determining  the  fuel  conservation  potential  of  the  selected  fly- 
wheel/diesel  hybrid  concept.  The  method  is  based  on  the  balance 
of  energy  flows  from  and  to  the  flywheel  energy  storage  subsystem. 
The  analysis  is  predicated  on  the  determination  and  use  of  average 
efficiency  values  of  each  of  the  drive  components. 

Upon  completion  and  acceptance  of  this  assessment  method,  a 
computer  simulation  model  was  used  as  a tool  to  develop  component 
functional  specifications  of  the  selected  power  drive  hybrid  con- 
cept. In  the  computer  simulation  program,  performance  and  effi- 
ciency maps  of  the  power  drive  components  are  used.  The  accuracy 
of  the  simulation  model  output  depends  greatly  upon  the  accuracy 
of  these  maps.  The  maps  which  have  been  used  are  considered  to 
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be  the  best  available.  A detailed  computer  listing  of  the  simu- 
lation modeling  is  presented  in  Section  3 of  this  report. 

The  preliminary  assessment,  which  follows,  estimates  the 
road  load  power  requirement  for  a drive  cycle  considered  to  be 
realistic  from  an  energy  requirement  viewpoint.  Estimates  are 
then  made  of  the  average  efficiency  of  each  component  when  operated 
over  the  chosen  drive  cycle.  Then,  through  energy  balance  relation- 
ships, the  fuel  consumption  per  mile  is  calculated. 

2.3.1  Dynamic  Road  Power  Demand 

The  instantaneous  dynamic  power  demand  manifested  at  the 
drive  wheels  of  an  urban  bus  vehicle  during  any  drive  cycle  is 
expressed  by 


P.  = P.^  -t-  P^  + P 


A 


D 


(2-1) 


where 


P^  = Instantaneous  power  at  the  drive  wheels  due  to  vehicle 
losses  incurred  while  in  motion. 

P^  = Power  loss  or  gain  due  to  vehicle  inertia  effects  - 
either  during  an  acceleration  or  deceleration  phase: 

Pj^  = Power  loss  due  to  air  resistance  on  the  vehicle; 

P„  = Power  loss  due  to  tire/ground  resistance  and  wheel/axle 

r 

bearing  losses ; 

Pj^  = Power  loss  or  gain  due  to  vehicle  negotiating  an 

elevation  change  in  the  road  profile  - (in  terms  of 
grade  slope  in  percent).  During  this  study,  this  loss 
will  be  neglected. 

The  power  loss  in  kilowatts  for  straight  line  motion,  con- 
sists of  the  translational  acceleration  effects  of  the  vehicle 
mass  and  the  rotational  acceleration  effects  of  the  rotating 
elements  of  the  power  drive  train  and  is  expressed  by 
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(2-2) 


n 

= K^(GVWR)  (ACC)  (V)  + I.a.oo. 

where  and  are  parameters  to  assure  dimensional  compatibil- 

ity 

CVWR  = Rated  Cross  Vehicle  Weight;  lbs 
ACC  = Acceleration;  mph/s 
V = Velocity  mph 

2 

= Moment  of  inertia;  slugs  ft 

7 

= Rotational  acceleration ; rad/ sec 
= 9.07  X lO'^ 

= 135  X 10‘^ 

For  preliminary  analyses  the  rotational  effects  are  approximated 
as  10%  of  the  translational  effects.  Thus 


= I.IOK^  (CVWR)  (ACC)  (V)  (2-3) 

where 

CVWR  = Normal  Cross  Rated,  Vehicle  weight;  pounds. 

ACC  = Linear  acceleration  of  vehicle;  mph/sec. 

V = Resultant  vehicle  velocity;  mph. 

= Parameter  to  assure  dimensional  compatibility. 

= .0907  X 10'^ 

The  power  loss  in  kilowatts  due  to  the  air  resistance  on  the 
vehicle  is  expressed  by 


Pd  = Kj,CpSV 


(2-4) 


where 


Cp  = Air  drag  coefficient 
S = Vehicle  frontal  area;  sq.  ft. 

V = Vehicle  resultant  velocity;  mph 
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Kq  = Parameter  to  assure  dimensional  stability 
= 5.089  X 10'^ 


Equation  (2-4)  is  rewritten  as  follows: 


= 5.089  X 10'^ 


(2-5) 


The  power  loss  in  kilowatts  due  to  the  drive  wheel/ground 
rolling  friction  and  wheel/axle  bearing  losses  is  expressed  by 


where 

f = Wheel/ground  rolling  friction  coefficient 
Kp  = Parameter  to  assure  dimensional  stability 

= 1.9885  X 10'^ 
r 

Many  values  of  the  rolling  friction  and  bearing  loss  coefficient 
have  been  quoted  and  measured  under  controlled  conditions  by 
various  authors  as  noted  in  the  technical  literature.  It  would 
appear  that  during  real  life  conditions  many  vehicles  may  not 
maintain  the  tire  pressures  consistent  with  those  used  in  the 
tests,  and  there  may  not  be  compatibility  of  the  route  surface 
conditions  with  that  of  the  tests  and  a host  of  other  mismatches. 
Based  on  available  data  the  following  expression  for  f was 
developed : 


The  resulting  power  loss  in  kilowatts  due  to  rolling  friction  is 
expressed  by 

Pp  » 1.99  X I0'h.055*30xl0-V.25xl0-V)  (GVWR)  (V)  (2-8) 

The  power  loss  in  kilowatts  due  to  the  negotiating  of  a grade  in 
the  road  profile,  is  expressed  in  terms  of  the  slope  in  percent. 


Pp  = Kp  (f)  (GVWR)  (V) 


(2-6) 


f - .005  + 30  X 10"S  + .25  X lO'^V^ 


(2-7) 


P^  = 1.99  X 10'^(^(GVWR)  ( sin(tan'^Y/100)))  V 


(2-9) 


where  y = slope  in  percent. 
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2.3.2  Balance  of  Energy  Flow 

Figure  2-5  is  a schematic  of  the  drive  chain  of  a flywheel/ 
diesel  powered  urban  transit  bus,  equipped  with  a system  for 
recovering  energy  when  the  vehicle  is  slowing  down.  The  overall 
energy  balance  of  the  power  drive  subsystem  during  any  kind  of 
drive  cycle  and  time  interval  is  (see  Figure  2-5): 


-BR 


FIGURE  2-5.  HYBRID  FLYWHEEL  PROPULSION  SUBSYSTEM 
WITH  REGENERATION 


^FW  ^MT  ^PD  ^DES  ^BR  '®^DE  ' ^REG  ° 


where 


TW 


^MT 


TD 


^DES 


= Net  flywheel  energy  extracted 

= Losses  in  mechanical  transmission  chain 

= Energy  consumption  due  to  vehicle  inertia  acceleration, 

due  to  air  drag,  due  to  ground  traction  rolling 

resistance  and  due  to  road  gradient  = E.  + E„  + E„ 

A K (j 

= Flywheel  energy  loss  during  diesel  engine  start  up 
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Energy  wasted  in  friction  braking 


E 

^BR 

^DE  ~ Energy  provided  to  flywheel  from  diesel  engine;  3=0 
if  the  engine  is  in  the  off  mode  and  3=1  during 
engine  charging. 

Ereg  ~ Energy  provided  to  flywheel  from  regenerated  energy 
mechanism . 

Estimates  of  Component  Efficiencies 

The  efficiency  of  the  mechanical  transmission  chain  from 
the  flywheel  to  drive  wheels  is  based  on  the  following  engineering 
estimates : 

y(REAR  AXLE)  = ,91 

y(CVRT)  = .77 


2.3.3  Drive  Cycle  Delineation 

Power  and  energy  relationships  were  determined  with  respect 
to  a particular  stop-and-go  urban  driving  schedule.  In  order  for 
the  simulation  model  to  provide  reasonable  values  for  the  hybrid 
subsystem  component  specifications  and  for  comparison  with  alter- 
native concept  approaches  it  was  necessary  to  establish  a reference 
drive  cycle.  Drive  cycle  candidates,  (shown  in  Figure  2-6)  were 
taken  from  the  TRANSBUS  and  Small  Bus  Specifications  (References 
5 and  6) , work  by  Renner  (Reference  7) , and  measurements  made  by 
TSC  in  the  Boston  area.  The  limit  drive  cycles  shown  may  be  con- 
sidered as  the  upper  and  lower  bounds  of  national  urban  drive  cycles 
when  considered  from  an  energy  point  of  view.  In  real-world  transit 
operations,  buses  are  subjected  to  varying  acceleration  and/or 
cruising  velocities  within  any  one  drive  cycle  as  well  as  with 
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ITEM 

NOMENCLATURE 

UPPER 

BOUND 

LOWER 

BOUND 

STUDY 

DRIVE  CYCLE 

(A) 

ACCELERATION  MODE 
(CONSTANT  ACCELERATION) 

3.5  mphps 

2.0  mphps 

2.5  mphps 

(C) 

CRUISE  MODE 
(CONSTANT  VELOCITY) 

35  mph 

20  mph 

25  mph 

(D) 

DECELERATION  MODE 
(CONSTANT  DECELERATION) 

3.4  mphps 

2.5  mphps 

2.5  mph 

(DW) 

DWELL  TIME  AT  BUS  STOP 

20  seconds 

10  seconds 

20.4  sec. 

FIGURE  2-6.  URBAN  TRANSIT  BUS  DRIVING  CYCLE 
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variation  in  the  number  of  stops  per  mile.  However,  from  the  stand- 
point of  determining  the  performance  behavior  and  comparisons  of 
(jifferent  power  drive  subsystems  such  as  a "standard  transit  bus 
with  a "hybrid  bus",  the  use  of  simple  repetitive  drive  cycles 
can  provide  data  of  sufficient  accuracy  for  the  purpose  of  the 
present  study. 

The  simple  trapezoidal - shaped  drive  cycle  used  in  this  study 
was  taken  as  an  average  of  the  upper  and  lower  bounds  shown  in 
Figure  2-6.  This  drive  cycle  was  assumed  repetitive  over  any 
number  of  stops.  It  should  be  noted  that  the  dwell  time  in  the 
stop  region  is  20.4  seconds  to  take  into  account  exiting  and 
entering  passengers  as  well  as  traffic  delays. 

2.3.4  Determination  of  Fuel  Usage 

The  fuel  usage  may  be  determined  in  the  following  manner: 

The  typical  high  heat  value  (HHV)  of  diesel  fuel  (ranging  from 
18,500  to  20,000  BTU  per  lb.  Reference  6)  is  estimated  at  19,250 
BTU  per  lb,  or,  (since  2511.5  BTU  = 1 HPHR  and  1 gallon  = 6.8 
lbs),  187,632  HP-SEC/GAL.  Fuel  usage  was  determined  from 

mpg  = (HHV)Cg/Epg 

where 

Cg  = Thermodynamic  conversion  efficiency  of  a diesel  engine 
and  is  a function  of  the  operating  range  of  engine 
speed  and  power. 

Average  estimated  values  for  component  efficiencies  were 
used  in  the  determination  of  energy  flows. 

Since  the  diesel  engine  is  to  operate  along  its  optimum  fuel 
usage  line  (see  Figure  2-3),  it  is  estimated  that  the  thermody- 
namic conversion  efficiency  is 

Ce  - .35 

The  efficiency  of  the  standard  bus  transmission  chain  is  based  on 
the  following  average  values  (Abstracted  from  the  technical 
literature) : 
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n (rear  axle) 

n (automatic  transmission) 
n (torque  converter) 


.91 


.85 


.80 


The  process  of  estimating  fuel  consumption  is  as  follows  (Refer  to 
the  Energy  Balance  Diagram  in  Figure  2-7): 

1.  Determine  the  energy  expended  per  cycle  by  integration 
of  the  power  drive  cycle.  Any  energy  of  regeneration  is 
added  to  the  flywheel  energy. 

2.  Extract  this  energy  expended  from  the  flywheel.  Track 
the  flywheel  rotational  speed. 

3.  Determine  when  flywheel  speed  drops  to  minimum  threshold 
level  (a  function  of  the  velocity  of  the  bus) . 

4.  Turn  engine  on  to  recharge  the  flywheel.  Determine  the 
time  for  full  flywheel  charge.  The  start  up  energy  of 
the  engine  must  be  taken  into  account. 

5.  Determine  the  fuel  used  during  the  on-cycle  operation 
of  the  engine. 

6.  Repeat  the  process  until  the  accumulated  mpg  levels  out. 

The  preliminary  estimates  of  fuel  usage  for  an  urban  hybrid 
bus  of  30,000  and  34,000  weights  are  illustrated  in  Figure  2-8. 

The  performance  characteristics  for  a typical  urban  bus  of 
similar  size  and  weight  are  also  estimated  for  comparison  with 
those  of  the  hybrid  bus.  The  energy  balance  diagram  for  the 
diesel  bus  is  illustrated  in  Figure  2-9,  and  the  comparison  is 
illustrated  in  Figure  2-8.  The  comparison  of  the  preliminary 
assessments  of  fuel  usage  between  the  hybrid  and  standard  transit 
buses  showed  sufficient  promise  for  the  hybrid  to  justify  the 
development  of  an  accurate  computer  performance  simulation  model. 

Prof.  A.T.  McDonald  had  developed  an  Engineering  Limit  Per- 
formance of  Transit  Buses  which  is  included  herein  as  Appendix  C. 
The  results  of  the  computer  simulation  program  discussed  in  this 
report  are  consistent  with  the  findings  of  Prof.  McDonald. 
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FIGURE  2-8.  FUEL  MILEAGE  AS  A FUNCTION  OF  STOPS  PER  MILE 
(ESTIMATED  DATA  USING  ENERGY  BALANCE  ANALYSIS) 
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FIGURE  2-9.  ENERGY  BALANGE  DIAGRAM  - STANDARD  BUS 
IN  URBAN  DRIVE  GYGLE 
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3.  COMPUTER  SIMULATION  PROGRAM 

3.1  INTRODUCTION 

The  present  study  was  initiated  to  compare  the  performance 
of  hybrid  power  drive  subsystems  with  a standard  transit  bus  heat- 
engine  power  drive  subsystem.  The  guidelines  for  the  hybrid  fly- 
wheel power  drive  subsystem  include  the  following: 

o Use  the  same  baseline  bus  configuration  and  the  same 
diesel  power  plant. 

o Replace  the  torque  converter  and  transmission  with  the 
following : 

A flywheel  kinetic  energy  unit  and  engine/ flywheel 
clutch 

A flywheel/transmission  clutch 

A continuously  variable  ratio  hydromechanical  trans- 
mission . 

o Select  a flywheel  size  capable  of  storing  enough  energy 
to  power  the  urban  transit  bus  over  a series  of  stop-and- 
go-drive  cycles  along  a simulated  scheduled  route,  with 
the  diesel  engine  in  the  "OFF”  mode. 

o Engage  the  flywheel  with  the  'STOPPED'  diesel  engine  to 
start  the  engine. 

o Use  the  diesel  engine  to  recharge  the  flywheel  when 
required . 

3.2  SYSTEM  OPERATING  PRINCIPLES 

3.2.1  Configuration  and  Engine  Operation  Mode  Options 

The  series  hybrid  concept  was  selected  as  the  baseline  con- 
figuration to  be  pursued  for  simulation  and  evaluation  because 
of  its  simplicity  of  assembly  and  simple  control  system  logic. 
There  are  a number  of  operation  modes  possible  with  the  series 
hybrid.  Two  of  the  more  interesting  ones  are; 
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(a) 


Continuous  Engine  Operation  Mode 


- Keep  the  diesel  engine  continuously  running  at  con- 
stant speed  and  power  except  during  braking. 

— Use  flywheel  power  to  fulfill  demand  power. 

— Regenerate  to  flywheel  during  braking. 

- Balance  over  a selected  number  of  cycles  per  bus 
route . 

(b)  On-Off  Engine  Operation  Mode 

— Operate  the  diesel  engine  in  an  on-off  mode.  Ini- 
tially bring  flywheel  up  to  maximum  rated  speed,  then 
shut  off  engine. 

— Use  flywheel  energy  to  power  the  transit  bus  over 

its  drive  cycle.  Limit  the  spin-down  of  the  flywheel 
to  a minimum  threshold  speed  which  will  permit  the 
engagement  and  start-up  of  the  engine  without  the 
complete  loss  of  flywheel  energy  and  which  should 
occur  near  the  point  of  braking. 

— Regenerate  to  the  flywheel  during  braking. 

— Use  flywheel  power  to  start  engine  and  use  engine 
power  to  bring  flywheel  speed  up  to  maximum  rated 
speed  during  stop  segment  of  drive  cycle. 

Intuitively,  the  on-off  mode  operation  should  develop  better 
fuel  economy  than  the  continuous  mode.  Therefore,  the  baseline 
concept  of  the  initial  study  phase  (the  diesel  engine/flywheel 
hybrid  concept)  employed  the  on-off  mode  of  engine  operation. 

3.2.2  On-Off  Engine  Operation  Mode 

In  this  mode  of  operation  the  heat  engine  is  started  and 
warmed-up  before  initiating  the  route  run.  The  engine  clutch  is 
engaged  to  "rev-up"  the  flywheel  to  its  maximum  operational 
speed.  The  engine  operation  control  system  logic  will  cause  the 
engine  clutch  to  disengage  and  the  engine  to  be  turned  off  when 
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the  flywheel  reaches  its  maximum  rpm.  The  transit  bus  is  then 
ready  to  begin  revenue  operations.  During  the  traverse  of  a 
number  of  driving  cycles,  energy  is  extracted  from  the  flywheel 
causing  it  to  spin-down.  The  control  logic  will  sense  the  thres- 
hold minimum  speed  of  the  flywheel  and  cause  the  engine  clutch 
to  re-engage  and,  thus,  cause  the  flywheel  to  turn  the  engine 
over  and  start-up.  This  will  further  extract  energy  from  the  fly- 
wheel and  cause  additional  spin-down.  The  energy  extracted  from 
the  flywheel  during  the  'powering'  of  the  transit  bus  and  engine 
restart,  must  not  cause  the  flywheel  speed  to  drop  below  its 
critical  minimum  speed  where  the  flywheel  will  be  ineffective.  A 
schematic  diagram  of  a typical  series  on-off  engine  power  drive 
subsystem  is  shown  in  Figure  3-1. 


DRIVE 

WHEEL 


DRIVE 

WHEEL 


FIGURE  3-1.  SERIES  ON-OFF  ENGINE  OPERATION  SCHEMATIC 
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3 . 3 PROGRAM 


3.3.1  Subsystem  Description 

The  computer  simulation  program  used  in  this  work  is  an 
adaptation  of  the  University  of  Wisconsin  hybrid  vehicle  computer 
program  which  was  developed  under  the  sponsorship  of  the  U.S. 
Department  of  Transportation  Office  of  University  Research  (Ref- 
erence 3)  . 

The  TSC  computer  program  is  sufficiently  flexible  to  permit 
any  vehicle  configuration  to  be  simulated  and  to  allow  rapid 
evaluation  of  subsystem  components  as  well  as  alternate  configura- 
tions. Basically,  the  program  consists  of  three  parts;  input, 
simulation  and  output. 

The  input  element  accepts  the  following  information: 

Vehicle  configuration  masses  and  moments  of  inertia. 

Vehicle  power  drive  subsystem  component  characteristics; 

e.g.,  heat  engine  data;  gear  box,  flywheel,  CVRT  transmission, 

rear  axle  gearing  and  drive  wheel  characteristics. 

Driving  cycle  characteristics  for  vehicle  route;  e.g.,  total 

length,  number  of  stops,  roadway  grade,  and  wind  conditions. 

The  simulation  element  of  the  program  accepts  input  informa- 
tion controlling  the  simulation  time  step,  time  interval  for 
storing  simulation  results,  and  operational  control  parameters. 

All  simulation  calculations  and  comparisons  with  necessary  vehicle 
system  operating  constraints  are  performed  within  this  element 
and  the  calculation  results  are  output  at  the  specified  time 
intervals  for  the  output  element. 

The  output  element  accepts  the  simulation  results  and  output 
specifications  to  produce  printouts  in  a variety  of  formats. 
Summaries,  tabular  outputs  and  graphic  plots  of  the  desired 
simulation  parameters  are  possible. 
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A flywheel  hybrid  vehicle  power  drive  subsystem  layout  to 
, be  simulated  for  this  study  is  shown  in  Figure  3-2.  A schematic 
organization  of  the  simulation  program  is  illustrated  in  the  block 
diagram  of  Figure  3-3.  The  equations  of  motion  of  the  vehicle 
basic  to  the  simulation  program  were  delineated  in  Section  2-3. 

I Representative  input  data  are  given  in  Figure  3-4. 

The  simulation  program  is  started  with  an  initialization 
step.  After  proper  initialization,  the  reflected  flywheel  rotor 
, element  of  the  flywheel  package  is  assumed  spinning  at  2,100  rpm 
I (the  basic  flywheel  is  rotating  at  11,000  rpm,  and  the  engine  and 
! transmission  "sees”  the  reflected  rotor  inertia  at  the  gear  box) . 

The  on-off  mode  of  operation  requires  the  engine  to  be  turned  off 
' when  the  'reflected’  flywheel  is  fully  charged;  that  is  spinning 
j the  drive  shaft  at  2,100  rpm.  Thus,  after  initialization,  the 
I heat  engine  is  in  the  'off  condition  and  the  engine  clutch 
disengaged. 

The  transmission  clutch  is  engaged  and  the  transit  bus  begins 
, the  driving  cycle  with  calculations  performed  for  time  increments 
of  0.10  seconds.  For  each  time  increment,  the  'automatic  driver' 
compares  the  current  vehicle  speed  (at  the  beginning  of  the  time 
increment)  with  the  required  speed  at  the  end  of  the  time  incre- 
ment (from  the  driving  schedule) , and  then  determines  the  required 
drive  shaft  torque  to  bring  the  transit  bus  to  the  desired  speed. 
The  required  torque  is  provided  by  the  energy  extracted  from  the 
flywheel.  The  extraction  of  energy  from  the  flywheel  causes  the 
flywheel  to  slow  down. 

As  previously  noted,  the  engine  is  in  the  "off"  mode  when 
the  flywheel  is  fully  charged  to  2,100  rpm  drive  shaft  speed. 

When  the  reduction  in  flywheel  speed  due  to  energy  extraction 
reaches  the  minimum  threshold  value  (a  function  of  vehicle  speed, 
see  Figure  3-5)  the  engine  clutch  is  engaged  and  the  engine 
operates  in  the  "on"  mode.  Fuel  is  consumed  only  when  the  engine 
is  in  the  "on"  mode.  Fuel  consumption  is  calculated  based  on  the 
fuel  rate  provided  as  input  data. 
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FIGURE  3-2.  COMPONENT  LAYOUT  DIAGRAM  OF  HYBRID  POWER 
DRIVE  TRAIN  SUBSYSTEM 
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FIGURE  3-3.  SIMPLIFIED  SYSTEM  BLOCK  DIAGRAM 
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FIGURE  3-4.  INPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
(Sheet  3 of  6) 
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FIGURE  3-4.  INPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
(Sheet  4 of  6) 


— jityLL  vvi 

IM  rLYAr(-LL 

b w A L E ^ 

»ic:=:  Cl 

^■CJLtOn  1 

•7oo:  Cl 

onrTN — 
♦lOCE  00 

.200:  03 

.'.or  L - 0 
11 

c.  \ C* ' *<  j*  ^ I / 
03 

•6ic:  03 
— i620£-03-- 

scaled 

- -610:  03— 
•£20:  03 

• 6032  03 

.611E  03 

* 62^E  03 

.627:  03 

.635E  03 

.620: 

03 

■ . C-20:  '03 
I )<• 

— .62  ■■■:-  C3 
• ic o:  c3 

• 6c  CE  C 2 

■*  Ao?.E”03 — 
•C2CE  C3 

"•  1a  z. — V 

T62'*b  03 

. r:  d / 1.  u A 

^ 6 3 ^ w w 

• ‘ ^ w A 

V 

.330:  00 

•330:  00 
— .2£:9E-00 — 
NVEL 

•33^:  CO 

.330:  CO 

.385:  00 

. 36 1 : 00 

.332:  cc 

• *3  U u Z. 

cc 

• 2 0?  £ ‘"00 
v£l Inc 

■*£ijCt.  00 — 

* w V C. 

E^3STT ( I ) 

T.T'^INC 

nti-^es 

'•  1 V ' w s./ 

A ^ u cL  V ^ 

• X - - V > 

fl  * / w 0.  ^ 

’ X - * w 

£NG3TP{ I ) 

1 

•‘E^cCb. — O-'f' 
I Ow. 

' f^UlDL 

.c O.i 
T"ClO_^"3r 

•”!  3C£  ' O'd 

♦ c 'd  'i  r.  •/ 
CVT'^AX 

rrsoET'c: 

.250:  C'A 
ITSINV 

«)  J 
( 1 ) 

Jo-o*u  b'Jfe 

VVAXC 1 ) 

"J  ^ 1 . U 

VINT ( 1 ) 

id  j • ;j 

TO 

TA) 

* L’ 

u 

• w 

♦ v..  .^  - I.  W 

V- : ( 2 ) 

• ■r-o:  03 
V'^AX  ! 2 ) 

• c 0 w c.  V 2 

vr;^(2) 

• C vi  - 3 
^ I T i " 

JMTS: 

• JL  'J  V — C 

rT)*2.*3.1 

A152/6C*32. 

17^. 

.Kc:  02 

i L 

.122:  00 

V V I . 
j 3 0 C £ 0 C 



»3C0:  02 

V . i 

OCCE  C5 

VTI ITOO 

.760:  00 

.3CCE  05 

.7b0:^02 

•15CE  05 

vv  I 4 
• 1 6 £ £ 

Cl 

ry\  i U 

• 142E;  02 

A V I A 
.60C:  02 

» i i o 

*370E  01 



.ooo:  00 

V I 

-650E  00 

VV'  I S A C; 

•236E  03 

VV  I b H 
.A8C:  02 

W 1 1 P" 

.iccE-o: 

’ \ i W . 1 

.26:e:  CO 

t V 1 J , 

o2C5E  01 

• 33!;:  01 

T vT  0 ' A 

^ 4 r>  r,  — r O 

• ^ ^ r\ 

»ooo:  00 

■J  ‘.  . \ V - 

•loo:  00 

'✓  * 
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MISCELLANEOUS  PARAMETERS:  SEE  APPENDIX  D 
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FIGURE  3-5.  THRESHOLD  LIMITS  FOR  FLYWHEEL  SPEED 
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li 

[ The  calculations  are  carried  through  the  drive  shaft,  CVRT 

II  transmission,  rear  axle  and  to  the  drive  wheels.  The  dynamics  of 

l| 

!i  the  vehicle  are  then  determined  and  energy  losses  are  integrated 
' for  each  time  increment  of  the  driving  cycle.  The  whole  process 
^ then  repeats  until  the  end  of  the  driving  cycles  constituting  the 
route  length. 

j Representative  output  data  are  illustrated  in  Figure  3-6. 

I'  The  computer  simulation  program  can  be  exercised  for  any 

I drive  cycle,  any  route  length  and/or  any  number  of  bus  stops. 

; 3.3.2  Hybrid  Power  Drive  Simulation  Results 

Ij  The  hybrid  computer  program  was  exercised  for  the  series 

I configuration  with  the  engine  operating  in  the  on-off  mode.  In 

I most  of  the  cases  the  lower  limit  driving  cycle  illustrated  in 

I Figure  2-6  was  used.  The  gross  vehicle  weight  was  30,000  pounds. 

I Enough  variation  in  driving  cycle  and  vehicle  weight  was  studied 

to  obtain  an  understanding  of  the  effect  of  these  variables.  The 

computer  runs  were  generated  with  variation  in  flywheel  moment  of 

2 

inertia  from  8 to  17  ft-lb-sec  (reflected  to  drive  shaft)  and 

I 

! for  6,  8 and  10  stops  per  mile. 

When  due  consideration  is  given  to  fuel  consumption,  fly- 
wheel weight  and  frequency  of  on-off  cycles,  a flywheel  moment  of 
inertia  of  14  Ib-ft-sec"^  appears  to  be  a reasonable  initial 
design  value. 

Figure  3-7  illustrates  the  results  of  some  simulation  runs. 
The  fuel  consumption  (gpm)  decreases  slowly  with  increasing  values 
of  flywheel  moments  of  inertia  over  the  entire  range  studied. 

For  a fixed  maximum  flywheel  rotational  speed  and  fixed  diameter, 
the  flywheel  weight  varies  linearly  with  moment  of  inertia.  As 
shown  in  Appendix  B,  the  flywheel  system  weight  is  approximately 
2,200  pounds  for  a (reflected)  inertia  of  14  ft-lb-sec  . 

A comparison  of  fuel  consumption  performance  of  the  hybrid 
power  drive  (inertia  =14)  with  the  baseline  bus  fuel  consumption 
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FIGURE  3-6.  OUTPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
WITH  A MODIFIED  EPA  DRIVING  CYCLE  (Sheet  1 of  5) 
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FIGURE  3-6.  OUTPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
WITH  A MODIFIED  EPA  DRIVING  CYCLE  (Sheet  2 of  5) 
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FIGURE  3-6.  OUTPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
WITH  A MODIFIED  EPA  DRIVING  CYCLE  (Sheet  3 of  5) 
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FIGURE  3-6.  OUTPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
WITH  A MODIFIED  EPA  DRIVING  CYCLE  (Sheet  4 of  5) 
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FIGURE  3-6.  OUTPUT  DATA  - DIGITAL  SIMULATION  OF  A 30,000  LB  HYBRID  BUS 
WITH  A MODIFIED  EPA  DRIVING  CYCLE  (Sheet  5 o£  5) 


FUEL  CONSUMPTION  IN  GALLONS/MILE 


.16 


.02 


ol I I I \ L 

6 8 10  12  14  16 

FLYWHEEL  MOMENT  OF  INERTIA  ~ FT-LBS-SEC^ 
(REFLECTED) 
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FLYWHEEL  MOMENT  OF  INERTIA 
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performance  is  shown  in  Figure  3-8.  The  hybrid  bus 
cient  improvement  in  fuel  economy  over  the  standard 
a design  study  culminating  in  an  integrated  hybrid 
subsystem  design. 


shows  suffi- 
bus  to  warrant 
power  drive 


Other  analyses 
program  from  which 


have  been  made  using  the  computer 
the  following  can  be  predicted: 


s imulat ion 


1.  The  diesel  engine  power  may  be  reduced  to  approximately 
100  horsepower  (lower  limit).  This  will  result  in  a 
modest  weight  reduction  of  about  1,000  pounds  in  the 
hybrid  propulsion  subsystem,  and  a reduction  in  fuel 
consumption  and  exhaust  emissions. 

2.  For  other  driving  cycles  representative  of  urban  bus 
operation,  the  ratio  of  fuel  consumption  of  the  hybrid 
to  fuel  consumption  of  the  baseline  bus  will  not  differ 
radically  from  the  data  shown  in  Figure  3-8. 

3.  A parallel  hybrid  configuration  will  show  very  little 
improvement  in  fuel  economy  (if  any)  over  the  series 
configuration.  It  will  be  less  attractive  because  of 
its  increased  complexity  and  maintainability  due  to 
additional  components. 


4.  The  continuous  mode  of  engine  operation  will  not  show 
any  significant  advantage  over  the  on-off  mode  studied 
in  this  report. 
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TRANSIT  BUS  MILEAGE  - MPG 


VGWR 

- 30,000  # 

ACCEL 

- 2.5  mph/s 

CRUISE 

- 25  mph 

DECEL 

-2.5  mph/s 

DWELL 

- 20.4  Sec. 

I.,,=14  LB-FT-SEC^ 
FW 


N ~ NUMBER  OF  BUS  STOPS/PER  MILE 


FIGURE  3-8.  HYBRID  TRANSIT  BUS  PERFORMANCE  FROM 
COMPUTER  SIMULATION 
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APPENDIX  A 

PREVIOUS  FLYWHEEL  AND  HEAT  ENGINE  STUDIES 


Flywheel  Background 

Robert  Clerk  (Reference  9)  describes  the  early  history  of 
flyv/heel  applicability  to  a number  of  vehicles  including  the  fly- 
wheel-powered Howell  Torpedo  of  1885. 

Most  of  these  historical  applications  used  steel  flywheels. 
They  illustrate  the  many  advantages  of  flywheel  energy  storage 
even  though  the  performance  was  very  poor  according  to  present 
technology.  The  advantages  include: 

1.  Rapid  charge/discharge  capability; 

2.  Unlimited  depth  of  discharge  and  number  of  cycles; 

3.  Simplicity,  no  maintenance,  and  infinite  self  life; 

4.  Flexibility,  i.e.,  input/output  can  be  electrical  (AC  or 
DC),  hydraulic,  or  mechanical,  or  any  combination;  and 

5.  Autonomy  from  ambient  environment. 

But  these  early  flywheels  also  had  a number  of  very  important 
disadvantages,  which  inhibited  flywheel  development  until  the 
present.  Clerk  described  these  disadvantages  as: 

1.  Relatively  poor  energy  storage  per  pound; 

2.  Poor  efficiency,  i.e.,  short  rundown  time,  and 

3.  The  ever-present  hazard  of  catastrophic  failure. 

Although  modern  technology  has  provided  an  order  of  magnitude 
improvement  in  steel  flywheel  energy  density  and  efficiency,  the 
hazard  problem  has  gotten  proportionately  worse.  In  spite  of  its 
present  limitations,  the  flywheel  is  being  introduced  in  an  in- 
creasing number  of  applications  throughout  the  world,  including 
small  road  and  non-road  vehicles,  buses,  a variety  of  electrical 
power  supplies,  hoists,  aircraft  catapults,  trains,  and  earth- 
moving  vehicles. 
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The  first  major  vehicular  application  of  flywheels  was  the 
Oerlikon  Electrogyro  bus,  used  in  European  and  African  transit 
services  in  the  1950's.  The  buses  were  technically  successful 
and  economically  feasible.  However,  long  waits  between  recharges 
and  difficulties  imposed  on  the  vehicle  operators  forced  a gradual 
withdrawal  of  these  buses  from  service. 

Lockheed  has  worked  on  a program  to  demonstrate  flywheel 
propulsion  systems  in  San  Francisco  using  a dual  mode  vehicle 
operating  either  from  energy  sypplied  by  the  flywheel  or  from 
energy  supplied  by  trolley  wires  (.Reference  10)  . Initial  analysis 
suggested  an  effective  electric  vehicle  with  increased  route  flex- 
ibility. Lockheed  has  also  examined  several  flywheel  and  flywheel 
hybrid  concepts  in  detail  for  the  Environmental  Protection  Agency 
(Reference  11} . These  studies  centered  on  the  hybrid  configuration 
of  a small  flywheel  with  a slightly  reduced  engine,  e.g.,  about  50 
percent  of  a normal  power  plant.  This  system  was  found  to  offer 
only  minor  advantages  over  the  conventional  automobile  drive  system 
in  terms  of  economy  and  emissions.  Furthermore,  the  high  perform- 
ance was  limited  to  a small  number  of  cycles  because  the  small 
flywheel  was  quickly  discharged.  The  study  also  found  that  a pure 
flywheel  drive  system  was  impractical  for  a conventional  American 
automobile.  The  biggest  drawback  was  the  size  of  the  drive  system 
necessary  to  give  a 5000-lb  vehicle  a 200-mile  range.  However, 
special  purpose  vehicles  with  a limited  range  were  found  to  be 
excellent  candidates  for  flywheel  power  systems. 

Garrett  Research*  is  currently  testing  flywheels  as  an  element 
of  a regenerative  braking  system  for  the  New  York  subway  system 
(Reference  12) . Large  flywheels  absorb  braking  energy  during 
stops  and  give  it  up  upon  demand  during  accelerations  or  emergen- 
cies. The  Garrett  tests  indicate  the  regenerative  system  could 
reduce  electrical  energy  demands  by  nearly  30  percent  and,  in 
addition,  provide  sufficient  power  for  the  trains  to  reach  the 
next  station  in  the  event  of  a power  failure. 

*Garrett  Research  and  G.E.  are  presently  involved  in  alternate 
flywheel  storage  systems  studies  for  urban  transit  buses  under 
UMTA  sponsorship. 
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In  addition  to  the  flywheel  power  units  just  described,  other 
ivariations  of  f lywheel - dr iven  vehicles  are  feasible  as  transporta- 
tion alternatives.  A more  comprehensive  look  at  the  field  of  fly- 
wheel hybrids  follows. 

Aerospace  Hybrid  Study  Review  (1976  Draft) 

The  most  recent  study  of  hybrid  propulsion  was  performed  by 
'the  Aerospace  Corporation  (Reference  13).  Both  heat  engine/ 
Ibattery  and  heat  engine/ flywheel  propulsion  systems  were  simulated, 
using  a computerized  model.  The  object  of  the  study  was  to  assess 
the  potential  of  hybrid  power  drives  in  reducing  energy  consump- 
tion while  still  fulfilling  Federal  emission  regulations.  Only 
nickel-zinc  batteries  and  steel  flywheel  storage  means  were  con- 
sidered sufficiently  advanced  to  be  included  in  a comparative 
study.  Lead-acid  batteries,  hydraulic  energy  storage  and  composite 
flywheels  were  rejected  as  either  inadequate  or  incompletely  under- 
stood . 

Three  vehicles  were  considered:  a 2,500  pound  automobile;  a 

4,000  pound  automobile;  and  a 6,000  pound  van.  The  vehicles  were 
configured  to  have  the  performance  characteristics  shown  in  Table 
A-1.  In  each  case,  the  hybrid  energy  consumption  was  compared  with 
published  measurements  of  representative  spark- igni t ion  powered 
vehicles,  manufactured  to  meet  Federal  emission  standards  of  1975/ 
1976  model  year. 

TABLE  A-1.  PHYSICAL  CHARACTERISTICS  OF  HYBRID  VEHICLES 


Vehicle  Loaded 
Weight* 

(lb) 

Tire  Radius 
(ft) 

T i re 

Pressure 
(psi ) 

Drag 

Area 

(ft2) 

Drag 

Coefficient 

(Dimensionless 

2500 

0.98 

25 

19.0 

0.45 

4000 

0.99 

25 

21.2 

0.45 

6000 

1.22 

40 

35.0 

0.76 

Loaded  weight 
lb  for  driver 

(includes  300  lb  for 
and  payload  in  van). 

occupants  and 

luggage 

in  cars,  and  1000 
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Series  and  parallel  power  drive  configurations  were  studied 
with  the  control  routine  depicted  in  Figure  A-1.  This  is  one 
example  of  a continuous,  variable  speed  mode  of  engine  operation. 


FIGURE  A-1.  Aerospace  Study  Control  Routine 

In  this  routine  the  power  at  the  flywheel  (or  generator)  is  main- 
tained at  a fixed  value  up  to  a given  vehicle  speed.  The  shift 
from  fixed  power  takes  place  only  when  the  vehicle  load  (as 
determined  at  the  engine  transmission)  exceeds  the  fixed  power 
level.  Then  the  power  output  is  increased,  following  the  increas- 
ing road  load  requirement.  No  other  control  routine  was  studied. 
The  on-off  type  of  heat  engine  operation,  although  considered 
attractive,  was  rejected  because  of  unknown  factors  influencing 
the  system  lifetime  and  control  system  complexity. 

Three  types  of  driving  cycles  were  selected  for  use  in  the 
comparative  evaluation,  namely,  the  ERA  Urban,  the  ERA  Highway  and 
the  U.S.  Rostal . Only  the  Rostal  is  of  interest  for  bus  propulsion 
system  evaluation.  This  is  illustrated  in  Figure  A-2. 


A-4 


o 

CM 

CM 


HdW  - AiI3013A 


A-5 


FIGURE  A- 2.  POSTAL  DRIVING  CYCLE 


The  hybrid  power  drive  examined  in  greatest  detail  was  the 
series  type  configuration.  For  the  heat  engine/battery  hybrid,  it 
included:  a conventional  1975  model  year  General  Motors  140  CID, 

4-cylinder,  spark- ignition  engine  utilizing  air  injection,  EGR, 
and  oxidizing  catalyst  for  emission  control;  nickel-zinc  storage 
batteries  with  a specific  energy  density  of  22  w-hr/lb;*  an  AC 
electric  generator;  a series-wound  DC  drive  motor;  and  a solid- 
state  chopper  control  to  regulate  battery  power  to  the  DC  drive 
motor.  For  the  heat  engine/f lywheel  hybrid  it  included;  a con- 
ventional 1975  model  year  General  Motors  140  CID,  4-cylinder, 
spark- ignit ion  engine;  a 1.09  foot  diameter,  25,600  rpm,  steel 
flywheel;  a continuously  variable  transmission;  and  a control 
system  to  regulate  power  flow.  The  flywheel  system  included  a 
guard  ring,  vacuum  housing  and  vacuum  pump  to  support  a pressure 
o f 5 mm  H g . 

The  effects  of  a parallel  configuration  and  of  regenerative 
braking  were  determined  separately.  For  the  hybrid  heat  engine/ 
battery  parallel  configuration,  it  was  estimated  that  the  required 
heat  engine  output  shaft  energy  (exclusive  of  battery  recharge 
energy,  and  accessory/engine  auxiliary  drive  energy)  would  be  70 
percent  of  that  required  in  the  series  configuration,  regardless 
of  driving  cycle.  This  figure  was  based  on  the  improved  efficiency 
of  an  automatic  mechanical  transmission  compared  with  the  combined 
efficiencies  of  the  generator/drive  motor  set.  For  the  hybrid 
heat  engine/f lywheel  parallel  configuration,  the  automatic  trans- 
mission efficiency  was  fixed  at  90  percent.  r 

Regenerative  braking  was  treated  parametrically.  Ten  and 
fifteen  percent  energy  recovery  values  were  used  for  comparative  I 
purposes  for  the  Urban  Driving  Cycle,  and  fifteen  and  thirty  i 


Lead-acid  batteries  were  found  to  be  too  heavy  for  the  require- 
ments of  the  study.  Nickel-zinc  batteries  were  used  in  the  ex- 
pectation that  they  (or  their  equivalents)  will  be  available. 
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percent  for  the  Postal  Driving  Cycle.  The  percent  energy  recovery 
refers  to  the  percent  of  total  driving  cycle  energy  recovered  and 
delivered  into  the  energy  storage  system  by  the  regenerative  brak- 
ing system.  This  energy  recovery  amount  was  then  used  to  reduce 
the  energy  required  from  the  heat  engine  for  recharging  the  energy 
storage  system. 

A brief  examination  was  made  of  the  type  of  performance  that 
might  be  expected  from  an  advanced  design,  high-speed  plastic- 
reinforced  composite  flywheel.*  The  intention  was  to  provide 
greater  energy  storage  capability  than  was  available  with  the 
metal  rotor  and,  thereby,  improve  the  vehicle  operating  range 
whenever  the  on-board  heat  engine  was  not  providing  full  recharge 
energy  to  the  flywheel. 

It  was  assumed  for  purposes  of  rotor  sizing  that  a guard 
ring  was  not  required,  thereby  allowing  a maximum  possible  rotor 
diameter  for  a vertical  power  shaft  mounting  of  the  flywheel  in 
the  hybrid  vehicle.  The  resulting  design  for  the  Kevlar  rotor  was 
2 feet  in  diameter  with  a speed  of  42,000  rpm. 

An  initial  evaluation  showed  totally  unacceptable  performance 
because  of  excessive  parasitic  losses  related  to  aerodynamic  drag, 
bearing  drag,  seal  drag,  and  vacuum  pump  power  requirements. 

Hence,  a large  amount  of  engine  power  was  required  to  keep  the 
wheel  recharged,  and  this  resulted  in  energy  consumption  much 
higher  than  that  of  a conventionally-powered  car. 

Lowering  the  pressure  in  the  flywheel  housing  to  reduce 
windage  losses  only  caused  a large  increase  in  pump  power  require- 
ments. Therefore,  a further  step  was  made:  assuming  improved 

- 3 

seals  to  hold  pressures  in  the  rotor  housing  down  to  10  mm  Hg 
without  requiring  an  increase  in  pump  power  requirements  over 
those  needed  to  sustain  5 mm  Hg  pressure.  Even  this  liberal 


This  part  on  composite  flywheels  is  copied  essentially  verbatim 
from  the  Aerospace  report  (Ref.  13). 
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assumption  did  not  produce  results  equivalent  to  those  for  the 
case  of  a steel  rotor.  It  appears  that  high-speed  composite 
wheels  are  not  viable  for  the  heat  engine/ flywheel  hybrid  vehicle, 
unless  parasitic  losses  can  be  reduced  to  much  lower  levels. 

The  results  of  the  Aerospace  study  of  interest  to  our  present 
bus  propulsion  study  are  listed  in  Table  A-2.  This  tables  shows 
the  energy  consumptions  of  the  hybrids  as  a percentage  of  the 
energy  consumption  of  the  convent ional -powered  vehicles  for  varia- 
tions in  regeneration  energy.  In  all  cases  shown  here  all  energy 
is  supplied  by  the  on-board  fuel.  For  those  cases  in  which  utility 
energy  is  used,  the  reader  is  referred  to  the  many  plots  in  the 
Aerospace  study. 

Table  A-2  shows  energy  consumption  reductions  of  as  much  as 
43%  for  heat  engine/battery  hybrids.  In  contrast,  for  the  heat 
engine/ flywhee 1 hybrids,  the  comparable  reductions  were  as  large 
as  55% . The  parallel  mode  always  shows  greater  reductions  in 
energy  consumption,  although,  for  the  Multi-Stop  Postal  Cycle,  the 
reductions  of  parallel  over  series  are  insignificant. 

The  Aerospace  study  considers  hybrid  vehicle  data  from  the 
most  significant  government  and  privately  sponsored  investigations. 
A synopsis  containing  a brief  description  of  major  components  of 
the  power  drive  is  given  for  each  hybrid  automotive  vehicle 
system  design  that  has  been  examined  in  recent  years  (11  systems) . 
Only  nickel-zinc  battery  and  steel  flywheel  energy  storage 
devices  were  considered  for  use  in  these  designs.  A tabular 
review  of  these  systems  is  included  at  the  end  of  this  appendix 
as  Table  A-4. 

A review  of  components  which  could  be  used  in  hybrid  power 
drive  sybsystems  was  made  in  the  Aerospace  study  and  by  TSC,  and 
is  included  in  Appendix  B. 

The  majority  of  the  designs  that  was  reviewed  evolved  from 
the  work  sponsored  by  EPA  in  the  period  1970-1972  and  was  pri- 
marily aimed  at  achieving  major  reductions  in  exhaust  emissions 
rather  than  reductions  in  fuel  consumption.  Only  two  of  the 
studies  had  configurations  and  projected  fuel  economies  that  are 
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TABLE  A- 2.  % ENERGY  CONSUMPTION  (GALLONS  PER  MILE) 

HYBRID  RELATIVE  TO  CONVENTIONAL 
Postal  Cycle 


TYPE 

HYBRID 

VEHICLE 

WEIGHT 

POUNDS 

REGENERATION 

% 

ENERGY 

SERIES 

CONSUMPTION  % 
PARALLEL 

BATTERY 

2500 

0 

75 

69 

15 

71 

66 

30 

67 

63 

4000 

0 

70 

65 

15 

66 

62 

30 

62 

58 

6000 

0 

71 

66 

15 

66 

62 

30 

62 

57 

FLYWHEEL 

2500 

0 

60 

57 

15 

57 

55 

30 

54 

52 

4000 

0 

58 

55 

15 

55 

52 

30 

52 

50 

6000 

54 

54 

51 

50 

50 

47 

47 

47 

45 

Source:  Ref.  13. 
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o£  interest  to  our  present  study.  These  are  the  studies  of  the 
University  of  Wisconsin  and  the  Technical  School  at  Aachen,  West 
Germany.  Descriptions  of  these  systems  and  some  of  the  results 
achieved  follow. 

University  of  Wisconsin  Hybrid  Automobile  - Design  and  Simulation* 

An  automobile,  based  on  a 3,000  pound  chassis  and  equipped 
with  a powerplant  incorporating  a high-speed  energy- storage  fly- 
wheel, has  been  analyzed,  designed  and  built  by  the  University  of 
Wisconsin  under  contract  to  the  U.S.  Department  of  Transportation 
(Ref.  3).  Design  and  fabrication  of  the  vehicle  have  been  aug- 
mented by  computer  simulation  studies  of  fuel  economy  and  emis- 
sions . 

A reciprocating  piston,  spark  ignition  gasoline  engine, 
calibrated  for  minimum  emissions,  is  connected  through  a clutch 
to  the  flywheel.  When  the  flywheel  speed  drops  below  a predeter- 
mined value,  the  engine  is  turned  on  and  run  at  full  throttle  for 
maximum  efficiency.  The  engine  is  shut  off  when  the  flywheel 
reaches  a maximum  design  speed.  A four-speed  manual  shift  trans- 
mission is  used  in  combination  with  a hydrostatic  power-split, 
continuously- variable  transmission  to  allow  for  proper  matching 
of  the  flywheel.  Power  is  transferred  partly  through  a hydro- 
static transmission  (pump  and  motor)  and  partly  through  a me- 
chanical gear  train.  The  system  is  designed  to  absorb  regenerative 
braking  energy  during  vehicle  deceleration. 

Basic  specifications  for  the  flywheel  are: 

1.  Usable  energy  storage  of  2/3  hp-hr 

2.  Maximum  windage  loss  of  1 hp 

3.  Overspeed  protection 

4.  Locked  bearing  protection 


* 

Verbatim  from  Reference  13. 
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I 5.  Alloy  steel  construction 

6.  250  £t-lb  torque  capability. 

Principal  features  of  the  CVRT  are: 

1.  A ratio  range  of  3.5:1 

2.  Torque  control 

, 3.  400  ft-lb  torque  capability 

4.  Designed  for  80  mph  maximum  vehicle  speed 

Vehicle  acceleration  and  regenerative  braking  are  controlled 
through  the  CVRT  by  varying  the  hydrostatic  pressure.  Although  a 
j production  vehicle  would  have  automatic  controls,  the  demonstra- 
tion vehicle  will  be  manually  controlled. 

, A computer  simulation  was  developed  by  the  University  of 

' Wisconsin  to  predict  the  fuel  economy  and  other  performance 
I characteristics  of  the  flywheel  vehicle.  Table  A-3,  based  on  1976 
emission  standards,  shows  comparative  predictions  for  three  dif- 
ferent types  of  3,000  pound  vehicles  and  includes  a breakdown  of 
energy  disbursement  in  each  case.  A potential  improvement  of  58% 

, (in  mpg)  over  the  conventional  car  is  shown  by  the  near-term  fly- 
wheel car.  This  predicted  improvement  is  based  on  the  ability  to 
j operate  the  engine  at  a brake  specific  fuel  consumption  (BSFC)  of 
0.50  Ib/hp-hr.  The  ability  to  shut  the  engine  off  when  the  fly- 
I wheel  is  not  being  recharged  and  the  use  of  regenerative  braking 
I also  contribute  to  saving  energy. 

An  examination  of  the  calculated  energy  losses  shows  the 
greatest  losses  occur  in  the  CVRT.  The  arrows  in  Table  A-3 
designate  those  components,  including  the  transmission,  that  the 
University  of  Wisconsin  feels  can  be  significantly  improved  in 
efficiency . 

Technical  School  at  Aachen,  West  Germany  Hybrid  Van  - Design  and 
Test 

Development  of  this  hybrid  drive  system  with  flywheel  energy 
storage  has  been  sponsored  by  the  West  Germany  Federal  Ministry  of 
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TABLE  A-3.  EPA  CYCLE  ENERGY  CONSUMPTION  BY  UNIVERSITY  OF  WISCONSIN 
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♦Equivalent  Work  *A  Single  CVT  Package 

Computed  at  .808#/HP-HR  will  Replace  Both  Units 


Research  and  Technology  since  1973.  The  ability  to  recover  energy 
during  vehicle  braking  and  to  operate  the  heat  engine  at  improved 
efficiency  account  for  the  reduction  in  fuel  consumption  over  that 
of  a conventional  power  drive. 

A schematic  of  the  parallel  configuration  power  drive  is 
shown  in  Figure  A-3.  The  major  components  are  an  electric-motor/ 
generator,  a heat  engine,  a differential  gear  train,  a flywheel 
primary  energy  storage  system,  and  a battery  secondary  energy 
storage  system.  Modulation  of  the  speed  and  torque  of  the  motor/ 
generator  controls  the  torque  and  speed  of  the  drive  shaft  leading 


BATTERY 


DRIVE  SHAFT 
TO  WHEELS 


FLYWHEEL 


FIGURE  A-3.  SCHEMATIC  OF  THE  TECHNICAL  SCHOOL  AT  AACHEN  HYBRID 
DRIVE  WITH  FLYWHEEL  COMPONENT  (Ref.  13) 

to  the  wheels  during  vehicle  motion,  as  well  as  energy  recharging 
of  the  battery  and  the  flywheel  when  the  vehicle  is  stationary. 
Power  from  the  battery  is  only  used  for  producing  the  necessary 
motor  torque  and  speed.  Power  from  the  flywheel  is  used  to  aug- 
ment heat  engine  power  for  vehicle  acceleration. 

A 2100  kilogram  Volkswagen  van  was  used  for  road  tests  on 
the  installed  hybrid  drive  train.  The  vehicle  top  speed  is 
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70  km/hr;  the  system  start-up  time  is  about  20  seconds  and  the 
-heat  engine  normally  runs  at  about  3,500  rpm. 

Road  test  results  are  shown  in  Figure  A-4,  which  shows  fuel 
consumption  against  the  dynamic  factor  (a  term  developed  to  cor- 
relate the  energy  requirements  of  various  types  of  driving  cycles) 
for  a conventional  van  and  the  hybrid  van.  The  dynamic  factors 
corresponding  to  various  driving  cycles  are  noted  on  the  plot.  A 
reduction  in  fuel  consumption  of  about  401  is  shown  (with  as  much 
as  45%  at  the  larger  dynamic  factors) . Between  10%  and  30%  of  the 
energy  available  for  recovery  during  dynamic  braking  was  actually 
recovered.  For  the  case  of  30%  energy  recovery  efficiency,  a 45% 
reduction  in  fuel  consumption  was  achieved.  Of  this  reduction, 
about  30%  was  attributed  to  recuperation  of  braking  energy  and  70% 
to  improved  operating  efficiency  of  the  heat  engine. 

Development  work  to  optimize  the  system  should  reduce  fuel 
consumption  by  50%  for  a wide  range  in  driving  cycles. 

The  University  of  Florida  Diesel/Battery  Bus 

The  Mechanical  Engineering  Department  of  the  University  of 
Florida  (Gainsville)  has  built  a hybrid  bus  under  the  direction 
of  Dr.  Vern  Roan  (Reference  14).  The  basic  vehicle  is  a modified 
Electrobus,  Model  20.  This  bus  is  propelled  by  a 50  horsepower- 
electric  motor  and  normally  its  energy  source  is  a lead-acid 
battery  pack.  The  batteries  were  resituated  and  a diesel  engine 
and  an  ac  generator  were  mounted  in  the  normal  battery  position  at 
the  rear  of  the  bus . 

The  diesel  engine  was  sized  so  that  it  operates  continuously 
at  near  rated  load.  The  bus  can  be  run  on  battery  power  alone,  if 
desired.  The  sizing  of  the  batteries  and  the  diesel  engine  was 
accomplished  with  the  aid  of  a computer  simulation  program.  The 
total  weight  of  the  battery  installation  was  quoted  as  3,700 
pounds . 

Other  elements  of  the  system  are  the  generator,  the  recti- 
fiers and  the  controls.  Two  three-phase  ac  generators  were  chosen 
in  order  to  minimize  size  and  weight  for  a given  power  output. 
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FUEL  CONSUMPTION  LITERS/KM 


FIGURE  A-4.  FUEL  CONSUMPTION  FOR  2100  Kg  VEHICLE  AS  A 
FUNCTION  OF  THE  DYNAMIC  FACTOR 
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Each  generator  charges  a single  battery  pack  weighing  1850  pounds. 
The  total  power  output  is  30  kW . Two  bridge  rectifiers  are  used 
to  provide  two  independent  voltage  sources  for  charging  the  pro- 
pulsion batteries.  The  control  for  the  generator  voltage  is  solid- 
state  but  the  battery  control  system  for  the  propulsion  motor  is 
composed  of  electromagnetic  relays  as  in  the  normal  Electrobus. 
There  is  controlled  dynamic  braking  but  no  attempt  was  made  to 
store  energy  through  regeneration. 

The  computer  simulation  allowed  study  of  the  system  response 
to  various  driving  cycles.  The  generator  output  was  varied  and 
time  of  operation  to  discharge  was  analyzed.  A typical  analysis 
is  shown  in  Figure  A-5,  which  corresponds  to  the  driving  cycle  of 
Figure  A-6.  On  the  pure  electric  mode  the  vehicle  was  predicted 
to  travel  1.7  hours  on  this  driving  cycle  (about  20  miles)  but 
with  increasing  generator  power  the  predicted  time  of  operation 
increases  until,  at  28  kW,  the  simulation  shows  the  bus  running 
all  day. 

The  hybrid  bus  of  the  University  of  Florida  has  gone  through 
an  initial  road  test  program  in  which  it  closely  followed  the 
drive  pattern  of  a diesel  bus  in  revenue  service  on  a transit 
route  in  Gainsville,  Florida.  Preliminary  results  from  these  tests 
indicate  a A0%  improvement  in  fuel  economy  over  the  standard  bus. 

Continuously  Variable  Ratio  Transmission  Devices 

A very  important  component  in  the  power  drive  connecting  the 
flywheel  energy  storage  device  to  the  drive  wheels  is  the  trans- 
mission unit.  It  is  necessary  to  match  the  energy  required  by  the 
drive  wheels  to  the  energy  extracted  from  the  flywheel  energy 
storage  unit.  There  must  be  a smooth  transition  between  the  two 
to  avoid  excessive  energy  losses  in  the  flywheel. 

The  Continuously  Variable  Ratio  Transmission  (CVRT)  repre- 
sents the  most  promising  mechanical  means  to  meet  such  transition 
requirements.  A state-of-the-art  review  of  CVRT ' s has  been  con- 
ducted at  TSC.*  Two  primary  CVRT  types  appeared  to  have  the 

* 

Zuckerberg,  H.,  "State  of-the-Art  Review  of  Continuously  Variable 
Ratio  Transmissions  (CVRT)  Subsystems,"  KHL-TSC- 76- 1411 , June  1976 
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FIGURE  A- 5.  PERCENT  CHARGE  AS  A FUNCTION  OF  TIME  FOR  DIFFERENT 
GENERATOR  SIZES,  AND  PURE  ELECTRIC 


SPEED  (MPH) 


35  - 


FIGURE  A- 6.  SPEED  AS  A FUNCTION  OF  TIME  CHART 
CYCLE  #1,  6 STOPS  PER  MILE 
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necessary  viability;  i.e.,  the  hydromechanical  and  the  traction 
drive  types  . 

The  hydromechanical  transmission  concept  offers  the  best 
near-term  (by  1980)  CVRT  for  application  with  the  hybrid  power 
drive  subsystem.  The  traction  CVRT  drive  is  considered  to  be  the 
best  long-term  CVRT  (by  1985)  and  beyond.  An  appreciable  develop- 
ment effort  will  be  necessary  to  bring  the  traction  type  CVRT  to 
fruition . 

Conclusions  From  Past  Work 

Very  few  of  the  hybrid  drives  that  have  been  built  to  date 
show  less  fuel  consumption  than  the  heat  engine-only  drive  when 
compared  over  the  same  drive  cycle.  In  most  cases,  they  have  been 
developed  for  reasons  other  than  enhanced  fuel  economy. 

The  multi-stop  drive  cycle,  typified  by  urban  bus  operation, 
is  a promising  application  of  hybrids.  This  is  especially  true 
of  the  heat  engine/ flywheel  because  of  its  potential  ability  to 
use  regenerated  braking  energy. 

The  parallel  configuration  requires  more  components  and  has 
more  control  complexity  than  the  series  configuration.  In  multi- 
stop operation  the  difference  in  energy  efficiencies  between  the 
parallel  and  series  configurations  will  be  small  (a  few  percent) . 

Regeneration  can  potentially  reduce  fuel  consumption  by  10% 
to  15%  in  multi-stop  drive  cycles. 

Improvements  in  flywheel  materials  and  fabrication  technology 
promise  weight  reduction.  However,  since  higher  rotational  speeds 
are  required  for  such  weight  reduction,  careful  design  studies 
must  be  made  to  determine  the  effect  on  parasitic  losses,  bearing 
life,  seal  effectiveness  and  safety. 

Present  lead-acid  batteries  when  operated  at  the  power  levels 
required  in  automotive  and  bus  driving,  would  have  a cycle  life- 
time that  is  probably  too  short  from  an  operational  cost  stand- 
point. On-going  developments  on  these  and  other  battery  types 
project  significantly  better  performance  within  five  years. 
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Present  knowledge  of  hydraulic  energy  storage  and  re-use  is 
not  sufficient  to  generate  a heat  engine/hydraulic  simulation  com 
parable  to  that  with  flywheel  energy  storage. 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  1 of  15) 


I.  HEAT  ENGINE/BATTERY  SYSTEM 


Organization 

Petro-Electric,  Ltd. 

Mercedes-Benz 

Objectives  and  Goals 

Develop  standard-size 
prototype  car  which  meets 
FCCIP  requirements 

Develop  a hybrid  diesel 
electric  bus 

Power  Train  Elements 

Configuration 

Parallel 

Series 

Heat  Engine 

Continuous  operation, 
variable  power,  Mazda 
rotary,  70  cu.in. , 9.4/1 
compression  ratio,  4- 
barrel  carburetor,  130  HP 
max  @ 7000  rpm,  115  ft-lb 
max  torque  0 4000  rpm, 
weight  273  lb 

OM  314  diesel  engine, 

232  cu.in.,  4-cylinder,  65  HP 
0 2200  rpm,  operated  for 
range  extension  of  vehicle 
during  highway  driving 

Emission  Control 
System 

Thermal  reactor  and  EGR 

Information  not  provided 
(INP) 

Electric  Traction 
Motor 

DC  shunt,  separately  ex- 
cited motor,  120  volts, 
115  amps  continuous  or 
600  amps  surge,  20  HP 
continuous  rating,  60  HP 
max  0 5500  rpm,  190  ft-lb 
max  torque,  weight  240  lb 

DC  shunt,  separately  ex- 
cited motor,  120  HP  contin- 
uous rating,  201  HP  max, 
4800  rpm  max  motor  speed, 
motor  weight  with  driving 
gear,  1330  lb 

Electric  Power 
Conditioning  and 
Control 

INP* 

Combined  pulse  width  and 
pulse  frequency  modulation 
max  pulse  frequency,  250  Hz 
min  pulse  duration  1 ms, 
max  current  - 600  amps 

Electric  Power 
Generator 

INP 

3-phase  generator  with 
rectifier 

Batteries 

8 Gould,  12-volt,  lead- 
acid  batteries;  voltage 
48  or  96;  90  amp  hours 
at  10-hr  rate;  600  amps 
max  current;  weight  300  lb 

Supplied  by  VARTA;  rated 
voltage  380  volts;  5-hour 
cap  city  discharge  275  A-hr; 
storage  capacity  104  kw-hr, 
weight  3.86  tons 

Transmission 

Manual  1973  Vega  - 
1st  gear  ratio  3.0/1 .0 
2nd  gear  ratio  1.85/1.0 
3rd  gear  ratio  1 .0/1 .0 

None 

Data  Source:  Reference  13 
*INP  = Information  not  present. 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  2 of  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM  (continued) 

Organization  Petro-Electric , Ltd.  Mercedes-Benz 

(continued)  (continued) 

Objectives  and  Goals 


Differential  Gear  ratio  5. 0/1.0  Single  reduction  gear 

between  electric  traction 
motor  & wheels 


Performance 

Emissions 


HC 

0.38  gr/mi , 40  mi , 
EPA  test 

INP 

CO 

2.42  gr/mi , 40  mi , 
EPA  test 

NO 

X 

0.76  gr/mi , 40  mi , 
EPA  test 

Acceleration 

0-60  mph,  17.5  sec  @ 

< 2.25  mph/second  from 

4950  lb 

stop  due  to  standees 

Fuel  Economy 

8.75  mi/gal , EPA  Urban 
Cycle 

INP 

Noise 

70  db  (A)  max 

INP 

Max  Speed 

INP 

43.5  mpg 

Gradeabi 1 ity 

INP 

11%  0 13.7  mph 

Range 

INP 

34.2  mi  with  stops  every 
0.25  mi  on  batteries  only 
All -day  operation  in 
hybrid  mode 

Payload 

INP 

66  - 110  passengers 
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TABLE  A-4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  3 o£  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM 


ORGANIZATION 
Objectives  and  Goals 

Power  Train  Elements 
Configuration 
Heat  Engine 

Emission  Control 
System 


Electric  Traction 
Motor 


Electric  Power  Con- 
ditioning and 
Control 

Electric  Power 
Generator 


Batteries 

Transmission 


TRW  Systems,  Inc. 

(1)  Select  and  analyze  performance  of  hybrid  vehicle 
designs,  (2)  Define  relative  weights  and  costs,  (3) 
Get  data  on  catalysts,  (4)  Develop  an  accumulator, 
(5)  Meet  75/76  emission  goals. 


Parallel 

Seri es 

Continuous  operation,  var- 
iable power,  71  Chevrolet 
Vega,  2300  cc  (140  CID), 

90  HP  (max) , al umi num 
block 

INP 

Hydrocarbon  accumulator 
of  activated  carbon  cat- 
alytic converter  with 
copper  oxide  on  aluminum 
pellets 

INP 

Series  DC,  30  HP  at  7200 
rpm,  180  terminal  volts, 
145  amps  at  22.5  ft-lb 
continuous  duty,  9-inch 
diameter  frame  GE  BT  2338, 
15-1/2  inches  long,  150  lb 

Series  DC,  65  HP  at  4650 
rpm,  235  terminal  volts, 
235  amps  at  74  ft-lb  con- 
tinuous duty,  12-1/2  inch 
diameter  frame  GE  CD  280/ 
2508,  21  inches  long, 

325  lb 

200  VDC  rectifier 

240  VDC  rectifier 

Salient  pole  alternator 
with  slip  rings,  10  kw 
0 12,000  rpm,  95%  effi- 
cient, rpm  range  1200- 
12,000,  3-phase  contin- 
uous duty,  40  lb,  8-in. 
diameter,  4 in.  long, 
400  Hz  base  speed 

Salient  pole  alternator 
with  slip  rings,  58  kw 
@ 4000  rpm,  95%  efficient, 
rpm  range  4000-12,000, 
3-phase,  continuous  duty, 
160  lb,  10-in.  diameter, 

19  in.  long,  400  Hz  top 
speed 

INP 

INP 

Electromechanical  trans- 
mission; 2:1 , 0 to  42.5 
mph;  1.5:1,  42.5  to  55 
mph ; 1:1,  55  to  85  mph ; 
planetary  geartrain 

INP 
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TABLE  A-4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  4 o£  15) 

I.  HEAT  EINGINE/BATTERY  SYSTEM 

Organization  TRW  Systems,  Inc. 

(continued) 


Objectives  and  Goals 


Differential 

Performance 

Emi ssions 

HC 

CO 

NO 


INP 


EPA  Urban  Cycle,  gr/mi 
Cold  Hot 

2.84  .29 

46.8  3.26 

3.84  .32 


INP 


INP 


Acceleration 

Designed  for  440 
10  sec 

ft  in 

INP 

Fuel  Economy 

INP 

INP 

Noise 

INP 

INP 

Max  Speed 

85  mph  calculated 
weight 

at  dry 

85  mph  calcula 
weight 

Gradeabi 1 i ty 

INP 

INP 

Range 

INP 

INP 

Payload 

INP 

INP 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  5 of  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM 


Organi zation 


Minicars,  Inc. 


General  Motors  Corp. 


Objectives  and  Goals 


Determine  relative 
reduction  in  exhaust 
emissions  obtainable  from 
a heat  engine/battery 
hybrid  car  compared  to 
same  vehicle  powered  by 
heat  engine  alone. 


Basic  in-house  research  to 
explore  use  of  low  emission 
Stirling  engine  in  a hybrid 
car. 


Power  Train  Elements 

Configuration  Series  hybrid,  elements  Series,  1189  pounds 

in  line 


Heat  Engine 


Emission  Control 
System 


Continuous  operation, 
variable  power  Corvair 
engine,  6-cylinder  opposed, 
clock-wise  rotation,  164 
cu.in.  displacement,  8/1 
compression  ratio,  single 
venturi  carburetor  with 
idle,  main,  and  power 
jets,  and  an  accelerator 
pump,  heat  air  intake  and 
manifold  legs 

INP 


Continuous  operation,  fixed 
power,  Stirling  engine 
(GPU-3),  converted  Army 
design  with  hydraulic 
controls  single-cylinder, 

8 HP  at  3000  rpm,  hydrogen 
working  fluid  at  1000  psi 
using  combustion  air 
blower. 


INP 


Electric  Traction 
Motor 


Electric  Power 
Conditioning  and 
Control 


Lear-Siegler  G22-3,  24V, 
300  amp,  9.7  HP  rated, 
shunt  motor-generator , 

94  lb,  2000-6500  rpm 
range 

Modulated  with  both  shunt 
field  control  and  varia- 
ble armature  voltage, 
throttle  delay  mechanism 


AC  induction  motor,  3-phase 
24  VDC,  20  HP  over  3:1 
speed  ratio 


Variable  frequency  and 
voltage,  all  solid  state, 
modulating  inverter  fre- 
quency and  amplitude 
control 


Electric  Power 
Generator 


(see  Electric  Traction  3-phase  alternator,  19  kv 

Motor)  nominal,  5500  rpm 


Batteries 


24  VDC  or  48  VDC  con- 
trolled by  parallel-series 
relay  (based  on  throttle 
depression)  12-12  volt 
batteries  in  different 
paral lei -series  configura- 
ti  ons 


14  series-connected  lead- 
acid,  SLI  batteries,  44  A- 
hr  at  20-hr  discharge  rate, 
6.6  kw 
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TABLE  A-4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  6 of  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM 

Organization  Minicars,  Inc.  General  Motors  Corp. 

(continued)  (continued) 


Objectives  and  Goals 


Transmission 


Differential 


Performance 


Emissions 


HC 

CO 


Acceleration 


Fuel  Economy 


Noi  se 

Max.  Speed 


Automatic  transmission.  Planetary  gear  set 

2.0/1  stal 1 ratio  at 
1400  rpm,  1.82/1  low  and 
reverse,  1/1  high  gear 

3.57  axle  gear  ratio  3.45/1.0 


DHEW  Cycle,  Constant 
Volume  Sampling  (engine 
air-fuel  ratio  set  at 

16.5  to  1.0) 

3.15  gr/mi 

29.6  gr/mi 
1 .0  gr/mi 


With  25  to  1 air-fuel 
ratio,  and  1200°F  heated 
combustion  air 


HC  (c6)  0.03  gr/hp-hr 
CO  0.5  gr/hp-hr 
NO  3.3  gr-hp-hr 


0-60  mph,  23.2  sec  on  0-30  mph  in  10  sec 

3000-lb  car  (5.64  mph/sec 

peak);  32.1  sec  on  4000- 

lb  car  (4.20  mph/sec 

peak) 


Internal  combustion  30-40  mpg  at  30  mph, 

engine:  14.5  mpg  at  15  engine-only  operation 

mph,  10.3  mpg  at  30  mph, 

12.6  mpg  at  50  mph; 
hybrid:  11.8  mpg  at  1 5 

mph,  8.8  mpg  at  30  mph, 

12.4  mpg  at  50  mph;  no 
all -electric  mode  pos- 
sible 


INP 


INP 


75  mph 


55  mph  with  heat  engine 
and  batteries , 30  mph 
with  heat  engine  alone 
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TABLE  A-4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  7 o£  15) 


I.  HEAT 
Organization 

Gradeabi  1 ity 
Range 

Payload 


ENGINE/BATTERY  SYSTEM 

Minicars,  Inc. 
(continued) 

INP 

~ 200  miles  on  heat 
engine;  believed  2-5 
miles  on  batteries 
only 

INP 


General  Motors  Corp. 
(continued) 

INP 

Heat  engine:  30-40  miles 

at  55  mph;  electric  power 
only:  15-30  miles  at  30 

mph 

3200  lb,  with  2 passengers 
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TABLE  A-4,  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  8 o£  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM 


Organi zation 
Objectives  and  Goals 


Power  Train  Elements 
Configuration 
Heat  Engine 


Emission  Control 
System 


Electric  Traction 
Motor 


Electric  Power 
Conditioning  and 
Control 


Electric  Power 
Generation 


The  Aerospace  Corporation 

(1)  Establish  through  computerized  analysis  and  hard- 
ware data  the  design  feasibility  and  potential  for 
major  reductions  in  exhaust  emissions  through  use  of 
hybrid  heat  engine/battery  vehicles,  (2)  Establish 
general  design  goals  for  components  & subsystems  in 
the  vehicle  power  train. 


Series  Parallel 


Continuous  operation,  var- 
iable power,  93  HP  spark 
ignition  engine  operating 
at  best  brake  specific 
fuel  consumption  of  0.5 
and  weighing  335  lb,  for 
powering  4000-lb  full- 
size  hybrid  family  car 

Lean  carburetion  (A/F= 

22),  oxidizing  catalyst, 
exhaust  gas  recirculation 

Forced-air  cooled,  8000 
rpm,  64  HP,  DC,  shunt- 
wound  with  step  voltage 
and  field  control  weigh- 
ing 337  pounds.  90%  peak 
efficiency,  80%  average 
efficiency 


Step  voltage  augmented 
with  field  control  and 
armature  current  sensing, 
12.5  lb  motor  controller, 
18  lb  AC  rectifier,  3 lb 
generator  controller, 
99.5%  control  system 
efficiency 

12,000  rpm  alternator, 
rated  at  51  kw,  weighing 
80  lb  with  rated  effi- 
ciency of  90%  and  average 
efficiency  of  80% 


Continuous  operation,  var- 
iable power,  84  HP  spark 
ignition  engine  operating 
at  best  brake  specific  fuel 
consumption  of  0.5  and  ' 

weighing  319  lb  for  power- 
ing 4000-lb  full-size 
hybrid  family  car 

Lean  carburetion  (A/F=22), 
oxidizing  catalyst,  exhaust  1 

gas  recirculation  J 

Forced-air  cooled,  8000  J 

rpm,  35  HP,  DC,  shunt-wound  i 

with  step  voltage  and  field  I; 

control  weighing  250  lb. 

90%  peak  efficiency,  80% 
average  efficiency  and  , ' 

capability  of  3:1  short-  j 

term  overload 

Step  voltage  augmented  with 
field  control  and  armature  .i  j 

current  sensing,  12.5  lb  ' 

motor  controller,  9 lb  AC  | 

rectifier,  2 lb  generator  I 

controller,  99%  control  ' 

system  efficiency 


12,000  rpm  alternator  rated 
at  7 kw  weighing  18  lb  with 
rated  efficiency  of  90% 
and  average  efficiency  of 
80% 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  9 of  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM 

Organization  The  Aerospace  Corporation 

(continued) 

Objectives  and  Goals 


' Batteries 

38  amp-hr  lead-acid  or 
nickel -zinc  with  capacity 
of  8.36  kw-hr,  weighing 
398  lb  and  required  to 
deliver  92.5  kw,  10 
shallow  charge-discharge 
cycles  (3.5%  of  capacity 
max)  per  vehicle  mile 

38  amp-hr  lead-acid  or 
nickel  zinc,  with  capacity 
of  8.36  kw  weighing  460  lb 
and  required  to  deliver 
92.5  kw,  10  shallow  charge- 
discharge  cycles  (3.5%  of 
capacity  max)  per  vehicle 
mile 

I Transmission 

transmission  not  necessary 

Modified  conventional 
3-speed  automatic,  rated  at 
64  HP,  90%  efficiency, 
weighing  59  lb 

. Differential 
< 

li 

95%  efficiency,  total 
rear  axle  drive  weighing 
80  lb 

95%  efficiency,  total  rear 
axle  drive  weighing  80  lb 

I Performance 

II 

Emi ssions 

Calculated  for  DHEW* 
Urban  Driving  Cycle 

Calculated  for  DHEW* 
Urban  Driving  Cycle 

HC 

0.361  gr/mi 

0.323  gr/mi 

! CO 

0.494  gr/mi 

0.442  gr/mi 

NOx 

0.504  gr/mi 

0.451  gr/mi 

Acceleration 

0-60  mph  in  13  sec,  peak 
acceleration  of  5 mph/sec 

0-60  mph  in  13  sec,  peak 
acceleration  of  5 mph/sec 

Fuel  Economy 

Calculated  11  mpg  over 
DHEW  Urban  Driving  Cycle 

Calculated  12.5  mpg  over 
DHEW  Urban  Driving  Cycle 

Noi  se 

INP 

INP 

Max  Speed 

80  mph 

80  mph 

Gradeabi 1 ity 

40  mph  on  12%  grade  for 
8 miles 

40  mph  on  12%  grade  for 
8 miles 

Range 

200  miles 

200  miles 

Payload 

Min.  of  300  lb,  passengers 
and  luggage 

Min.  of  300  lb,  passengers 
and  luggage 

*U.S,  Department  of  Health,  Education  & Welfare,  forerunner  of  ERA  cycle. 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  10  of  15) 

I.  HEAT  ENGINE/BATTERY  SYSTEM 
Organization  University  of  Wisconsin 

Objectives  and  Goals  Urban  Vehicle  Design 


Power  Train  Elements 

Competition  - 1972  - 
High  fuel  economy,  low 
emissions 

Configuration 

Paral lei 

Heat  Engine 

Continuous  operation,  vari- 
iable  power,  Wankel , 53  HP 
(power  train  also  functions 
in  other  modes  with  engine 
off) 

Emission  Control 
System 

INP 

Electric  Traction 
Motor 

DC,  continuous  rating  of 
18  HP 

Electric  Power 
Conditioning  and 
Control 

manual  control 

Electric  Power 
Generator 

INP 

Batteries 

Lead-acid,  run  between  50% 
and  90%  full  charge,  450 
lb,  36  volts 

Transmission 

1 :1  gear  ratio 

Di fferential 
Performance 

Gear  ratio  1:1  to  1:2 
depending  on  drive  mode 

Emissions 

HC 

CO 

NO 

X 

Simulated  LA4-1370  sec 
driving  cycle,  60%  efficient 
power  train,  no  emission 
controls  or  devices 
.559  gr/mi 
27.7  gr/mi 
1 .26  gr/mi 
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TABLE  A-4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  11  of  15) 

L.  HEAT  ENGINE/BATTERY  SYSTEM 


lOrgani zation 

University  of  Wisconsin 
(conti nued) 

Objectives  and  Goals 

Acceleration 

0.3  g (11  ft/s^) 

Fuel  Economy 

Simulated  LA4-1370  sec, 
60%  efficient  power 
train , 21 .6  mpg 

Noi  se 

INP 

Max  Speed 

INP 

Gradeabi  1 i ty 

INP 

Range 

Mode  1,  5-10  miles  (sim- 
ulated) ; Modes  2 , 3 INP 
(probably  limited  by  gas 
tank  size  only) 

Payload 

INP 
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TABLE  A-4.  DETAIL  REVIEW  OF  HYBRID 
CORPORATION  (Sheet  12  o£  15) 

II.  HEAT  ENGINE/FLYWHEEL  SYSTEM 

SYSTEMS  BY  AEROSPACE 

Organization 

Lockheed  Missiles  and 
Space  Company 

Johns  Hopkins  University 
Applied  Physics  Laboratory 

Objectives  and  Goals 
Power  Train  Elements 

(1)  Determine  through 
analysis  feasibility  of 
flywheel  system  as  a low- 
emission  propulsion  system 

(2)  Demonstrate  and 
evaluate  performance  of 
full-size  flywheels 

Conduct  proof-of-principle 
tests  of  the  "superfly- 
wheel" concept  and  evaluate 
, through  analysis  the  use  of 
such  flywheels  to  reduce 
automotive  emissions. 

Configuration 

Series 

Series 

Heat  Engine 

Continuous  operation,  var- 
iable power,  medium-size 
V-8,  350  CID  engine  char- 
acteristics scaled  from 
176  HP  for  full-size  4300- 
lb  car 

On-off  operation,  94  HP,  357 
spark  ignition  engine  for 
4300-lb  car,  characteristics 
derived  from  literature 
sources 

Emission  Control 
System 

Exhaust  recirculation  and 
Engelhard  oxidizing 
catalyst 

INP 

Transmission 

Hydrostatic  power- 
splitting, 238-lb 
Sundstrand  Version  8C 

Hydrostatic  power-splitting 

Control  System 

INP 

INP 

Flywheel 

Tapered  steel  disk  with 
rim  flange,  6.52-inch 
radius,  24,000  rpm,  86 
lb  weight  for  rotor  only; 
usable  energy  storage  of 
0.5  HP-hr  (max  of  1.0  HP- 
hr) , shaft  mounted  in- 
line with  engine,  total 
flywheel  system  weight 
of  187  lb. 

Reinforced  plastic  composite, 
5.3-inch-thick  bar  with  spin 
diameter  of  24  inches,  32,000 
rpm,  163-lb  rotor  weight, 

7.1  HP-hr  energy  storage, 

3.5  min.  recharge  time, 
system  weight  of  255  lb. 

Di fferential 

INP 

INP 

Batteries 

NA 

NA 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  13  of  15) 

II.  HEAT  ENGINE/FLYWHEEL  SYSTEM 

Organization  Lockheed  Missiles  and  Johns  Hopkins  University 

Space  Company  (cont.)  APL  (cont.) 

Objectives  and  Goals 


Performance 


Emissions 

Calculated  for  4300-lb 
car  over  EPA  Urban  Cycle, 
hot  start 

Calculated  for  4300-lb  cai 
over  EPA  Urban  Cycle,  hot 
start 

HC 

0.378  gr/mi 

0.127  gr/mi 

CO 

1.12  gr/mi 

1 . 97  gr/mi 

NOx 

1 . 21  gr/mi 

0.692  gr/mi 

Acceleration 

'k 

★ 

Fuel  Economy 

Calculated  10  mpg  over  EPA 
Urban  Driving  Cycle 

Calculated  14.4  mpg  over 
EPA  Urban  Driving  Cycle 

Max  Speed 

* 

* 

Gradeability 

* 

Range 

*,  200  mi 

*,  200  mi 

Payload 

*,  1700  lb  max 

*,  1700  lb  max 

*Specified  in  "Vehicle  Design  Goals  - Six  Passenger  Automobile,"  EPA  Advanced 
Automotive  Power  Systems  Program,  Revision  C,  May  28,  1971. 


TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  14  of  15) 

II.  HEAT  ENGINE/FLYWHEEL  SYSTEM 


Organization 

University  of  Wisconsin 

Technical  School  at 
Aachen,  West  Germany 

Objectives  and  Goals 

( 1 ) Study  & evaluate 
methods  for  improving  fuel 
utilization  efficiency  in 
autos  emphasizing  advanced 
power  plant  concepts,  (2) 
Complete  a demonstration 
flywheel  vehicle  and  test 
its  fuel  consumption  and 
emission  characteristics 

Development  and  demonstra- 
tion of  vehicle  power 
train  designed  to  reduce 
fuel  consumption  in  urban 
traffic 

Power  Train  Elements 

Configuration 

Parallel 

Parallel 

Heat  Engine 

2.3  liter, 

Spark  ignition  engine 
operating  on-off  at  wide- 
open  throttle  and  cali- 
brated for  low  emissions 
and  fuel  consumption. 
Clutch  connects  engine  to 
flywheel  for  recharging 

Continuous  operation, 

Wankel  rotary,  max  power  of 
15  kw,  max  speed  of  523 
rad/sec,  weight  of  28  kg, 
operates  normally  at  366 
rad/sec 

Emission  Control 

INP 

INP 

System 

Transmission 

Four-speed  manual  - in 
conjunction  with 
University  of  Wisconsin 
designed  CVT  hydrostatic 
power  splitting  unit  with 
400  ft-lb  capability  and 
3.5  to  1.0  speed  ratio 
range 

INP  (Direct  mechanical  link 
to  vehicle  drive  wheels  via 
differential  controlled  by 
electric  motor  torque.) 

Control  System 

Hydrostatic  system  linked 
to  CVT  transmission  and 
sensitive  to  position  of 
accelerator  pedal  and  use 
of  brake  pedal 

INP  (Electric  motor  torque 
and  speed  are  mechanical 
input  to  control  of  drive 
shaft  output  torque  and 
speed. ) 

Flywheel 

Ai Research  steel  design 
with  2/3  HP-hr  energy 
storage  and  250  ft-lb 
torque  capability 

Moment  of  inertia  of  0.621 
kg-m^,  max  speed  of  1832 
rad/sec,  weight  of  50  kg 
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TABLE  A- 4.  DETAIL  REVIEW  OF  HYBRID  SYSTEMS  BY  AEROSPACE 
CORPORATION  (Sheet  15  of  15) 

II.  HEAT  ENGINE/FLYWHEEL  SYSTEM 

iObjectives  and  Goals  University  of  Wisconsin  Technical  School  at  Aachen, 

(continued)  West  Germany  (continued) 

[Objectives  and  Goals 


Differential 

INP 

INP 

Batteries 

NA 

Energy 

weight 

content  of  4 
of  150  kg 

Electric  Motor 


Power  output  of  11  kw,  max 
speed  of  701  rad/sec,  weight 
of  65  kg 


Performance 


Emissions 


Acceleration 


Designed  to  meet  model 
year  1976  emission 
standards  of 


INP 


HC  = 
CO  = 
NO  = 


1 . 5 gr/mi 
1 . 5 gr/mi 
3.1  gr/mi 

INP 


Calculated  38  mpg  for 
3000-lb  car 


80  mph 


INP 

INP 

INP 


70  km/hr^ 


Fuel  Economy 

Max  Speed 
Gradeabi 1 i ty 
Range 
Payload 

*By  road  test  for  2100  kg  vehicle,  test  cycle  not  specified 


Max.  acceleration  of  1.2 
m/sec,  max.  deceleration  of 
1.4  m/sec  reaches  50  km/hr 
in  10.8  sec  (with  flywheel 
operating,  up  to  100  kw 
can  be  delivered  to  drive 
shaft) 

0.11  Itr/km  (reduced  fuel 
consumption  up  to  45%  com- 
pared to  conventional 
vehi cle) 


INP 

INP 

INP 
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APPENDIX  B 

SELECTED  POWER  DRIVE  SUBSYSTEM 
COMPONENT  REVIEW 
AND 

FLYWHEEL  SIZING 


B.l  COMPONENT  REVIEW 

B.1.1  Aerospace  Review  of  Components 

Aerospace  Corporation  made  a review  of  components  which  could 
be  used  in  hybrid  power  drives  (Ref.  13),  It  was  found  that  state- 
of-the-art  heat  engines,  electric  motors,  electric  generators  and 
controls  are  satisfactory  for  hybrid  propulsion.  However,  cost 
and  weight  reductions  are  possible  with  development  and  higher 
levels  of  production.  On  the  other  hand,  substantial  development 
is  needed  in  batteries,  flywheels  and  continuously  variable  trans- 
missions . 


B.l. 2 Batteries 

Specific  power,  specific  energy,  cycle  life  and  cost  are  the 
most  important  parameters  in  battery  selection.  Power  and  energy 
parameters  are  plotted  in  Figure  B-1  along  with  performance  re- 
quirements for  various  vehicles  configured  for  hybrid  operation. 
Lead-acid  batteries  do  not  meet  the  specific  energy  or  power  re- 
quirements of  any  of  the  hybrid  vehicles  shown.  Nickel -cadmium 
batteries  are  better  adapted  but  are  too  expensive  and  use  materials 
that  are  too  scarce.  Nickel-zinc  batteries  are  very  promising 
provided  they  can  be  developed  in  the  time-frame  desired.  It  does 
not  appear  that  development  of  molten  salt  batteries  is  crucial 
for  practical  hybrid  power  trains.  The  development  of  molten  salt 
batteries  does  not  appear  to  be  as  important  to  future  hybrid 
power  trains  as  the  battery  types  described  above. 
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SPECIFIC  POWER  (w/lb) 


COMMERCIALLY 

AVAILABLE 



UNDER  DEVELOPMENT 
FEASIBILITY  DEMONSTRATED 

SPECIFIC  ENERGY  (Wh/lb) 


FIGURE  B-1.  COMPARISON  OF  BATTERY  PERFORMANCE  CAPABILITIES  AND 
VEHICLE  REQUIREMENTS 


B-2 


I B . 1 . 3 Transmission^ 

j Several  types  of  continuously  variable  transmissions  were  in- 

jvestigated  for  possible  application  in  the  heat  engine/flywheel 
[vehicle  power  train.  Included  in  these  are  the  mechanical 
j (straight  gear  ratio),  the  hydrostatic,  the  multiple  V-belt 
, (variable  pitch  sheaves),  the  traction  drive  and  the  hydromechani- 
' cal  transmission.  Because  of  numerous  limitations  (size,  weight 
[cost,  durability  and/or  efficiency),  the  most  promising  candidates 

appear  to  be  either  the  traction  drive  or  the  hydromechanical 

i 

transmissions . 

1 

:B.2  TSC  REVIEW  OF  COMPONENTS 

TSC  findings  are  similar  to  those  of  the  Aerospace  Corporation. 
The  areas  where  the  most  development  is  needed  are  batteries, 

I flywheels,  continuously  variable  transmissions  and  hydraulic 
accumulators . 

j B . 2 . 1 Battery  Energy  Storage 

j In  contrast  to  the  need  for  high  energy  density  batteries  for 

electric  vehicles,  the  emphasis  in  hybrid  battery  design  is  on 
' high  power  density  to  handle  the  high  peak  power  involved  in 
acceleration,  regenerative  braking,  grade  climbing,  and  high- 
i speed  passing  maneuvers.  The  heat  engine  supplies  the  primary 
■ energy  requirements  but  displaces  space  and  weight  that  is  other- 
wise available  for  batteries  in  the  batter)^ -powered  vehicle. 
Therefore,  the  hybrid  battery  must  provide  the  same  or  greater 
i power  delivery  capability  as  the  electric  vehicle  battery  at  half 
I or  less  than  half  its  weight.  The  energy  storage  requirements  for 
the  hybrid  battery  are  less  severe  than  those  for  electric  vehicles. 

Ill  Experimental  car  experience  has  demonstrated  that  conventional 

I aqueous  storage  batteries  can  marginally  meet  hybrid  vehicle  power 
I and  energy  density  requirements,  and  battery  studies  have  indicated 

I ^Verbatim  from  the  Aerospace  study. 
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cost  and  materials  availability  but  is  marginal  from  a weight  point 
of  view.  The  lead-acid  type  has  an  open  circuit  potential  of 
approximately  2 V,  a theoretical  energy  density  of  76  Whr/lb,  and 
achieved  energy  densities  of  10-24  Whr/lb  and  power  densities  of 
40  to  90  W/lb.  This  battery  type  has  a high  current  capability, 
can  operate  over  a wide  temperature  range,  has  good  charge  retention 
high  efficiency,  long  life,  and  low  cost  for  materials  and  manu- 
facturing . 

The  attainable  energy  density  of  lead-acid  batteries  is 
dependent  on  the  discharge  rate  as  illustrated  in  Figure  B-2.  This 
rate  dependency  is  caused  primarily  by  mass  transport  and  ionic 
diffusion  limitations. 

Present  cycle  life  of  the  lead-acid  batteries  is  of  the  order 
of  300-500  for  high  energy  density  designs  at  deep  depths  of  dis- 
charge. Further  developments  promise  cycle  lives  up  to  1000  in  the 
near  term.  It  is  possible  to  increase  life  by  compromising  on 
energy  density.  One  question  which  should  be  addressed  is  the 


*H . Zuckerberg  and  C.  Salmi,  "A  Bibliography  on  Hybrid  Power 
Drive  Subsystems,”  material  on  file  with  Kentron  Hawaii,  Limited, 
Transportation  Systems  Center,  55  Broadway,  Cambridge  MA  02142. 
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ENERGY  DENSITY  WHR/LB 


FIGURE  B-2.  EFFECT  OF  DISCHARGE  RATE  ON  ENERGY-DENSITY  OF 
LEAD-ACID  BATTERIES 
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economic  trade-offs  between  the  use  of  light,  high  energy- 
density  batteries  with  short  life  and  the  use  of  heavier, 
longer-life  designs. 

As  can  be  deduced  from  the  information  in  the  technical 
press,  a substantial  effort  is  in  progress  to  develop  better 
lead-acid  batteries. Typical  avenues  for  improvements  include: 

a.  Lightweight  cases  with  shortened  intercell  connector 
path  lengths; 

b.  New  laminar  grid  design  where  the  active  material  is 
sandwiched  between  grid  segments  which  may  meet  the 
high  charge  and  discharge  current  needs  of  electric 
power  drives  for  longer  cycles;  there  may  not  be  any 
improvement  in  energy  density. 

c.  The  use  of  other  types  of  grid  alloys,  such  as  using' 
lead  with  calcium  and  tin,  and  fabricated  by  wrought 
processes  instead  of  casting.  (Wrought  processes  will 
develop  a better  microstructure  which  should  be  stronger 
and  more  corrosion  resistant.  This  should  lead  to 
thinner  and  lighter  grids  and  thus  a higher  energy 

dens ity . ) . 

d.  Further  development  and  improvement  of  the  automotive 
maintenance -free  lead-acid  batteries.  With  the  newer 
lead-calcium-tin  grids,  the  oxygen  over-voltage  is  low 
enough  that  gassing  is  negligible  at  normal  charging 
voltage  s . 

e.  The  use  of  potassium  perchlorate  as  the  electrolyte 
instead  of  sulphuric  acid  in  order  to  improve  the 
energy  density. 

It  is  possible  that  energy  densities  of  at  least  50  Whr/lb 
for  long  distance  duration  may  be  achieved  within  the  next  5 
years  along  with  power  densities  of  the  order  of  100  watts/lb. 
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Nickel-Zinc  Battery 

I'  The  nickel-zinc  battery  unit  has  an  open  circuit  potential 

I of  1.7  V,  a theoretical  energy  density  of  140  Whr/lb  and  an 
I achieved  energy  density  of  over  30  Whr/lb.  This  battery  unit 
is  of  great  interest  since: 

I a.  The  theoretical  and  practical  energy  density  is 

considerably  better  than  the  lead-acid  battery  unit; 

, b.  It  has  good  high-rate  capability; 

' c.  It  can  be  sealed; 

d.  The  cost  of  materials  is  reasonable. 

I Much  research  is  needed  to  improve  the  cycle  life  of  this 

j type  of  battery  unit.  One  possible  direction  is  the  development 
I of  improved  separators  which  are  essential  to  long  life. 

Nicke 1 -Cadmium  (Ni-Cad)  Battery 

The  Ni-Cad  battery  has  an  open  circuit  potential  of  1.3  V and 
a theoretical  energy  density  of  at  least  100  Whr/lb  depending  on 
I state  of  charge.  Ni-Cad  cells  permit  very  high  power  drain,  and 
i have  satisfactory  cycle  life.  Though  the  Ni-Cad  system  has 
! excellent  potential,  the  main  drawback  to  its  use  is  the  limited 
world  supply  of  cadmium  and  its  high  cost. 

Metal-Air  Batteries 

Metal-air  batteries  use  a metal  for  the  negative  electrode 
and  a gas  electrode,  using  oxygen  from  the  air,  for  the  positive 
side.  High  energy-density  metal-air  batteries  have  severe 
thermal  problems  since  this  type  of  battery  system  overheats 
quite  readily. 

Research  has  concentrated  on  the  zinc-air  types.  The  many 
problems  surrounding  this  concept,  including  passivation  of  the 
electrodes,  thermal  problems,  etc.,  are  discouraging  further 
application  of  this  type. 
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Iron-air,  aluminum- a ir  and  lead-air  systems  have  been 
looked  at.  Iron-air  seems  to  be  one  of  the  more  promising  types 
but  it  still  has  not  reached  the  stage  which  is  encouraging. 

High  Temperature  Batteries 

High  temperature  batteries  offer  both  high  power  density  and 
high  energy  density  ratings.  High  energy  is  achieved  by  using 
reactants  of  low  equivalent  weight  and  high  electron  difference. 
High  power  capability  is  achieved  by  use  of  low  resistance  elec- 
trolyte materials  such  as  fused  salts  and,  by  operating  at 
elevated  temperature  which  increases  the  exchange  current  density. 

Research  efforts  have  been  applied  toward  the  development 
of  the  following  types  among  others: 

Sodium- sulfur  system 

Potassium-sulfur  system 

Lithium-sulfur  system 

The  above  types  show  excellent  promise,  especially  if  they 
can  be  made  to  operate  in  the  vicinity  of  70°-100°C.  However, 
severe  engineering  problems  must  be  solved  to  achieve  the  neces- 
sary confidence  and  safety  for  public  use. 

B.2.2  Flywheel  Energy  Storage 

The  very  high  power  densities  and  moderate  energy  densities 
achievable  with  flywheels  provide  a good  match  to  the  require- 
ments of  hybrid  vehicles.  In  separate  tests,  Lockheed  determined 
that  the  power  density  of  a steel  flywheel  rotor  could  exceed 
5000  W/lb,  and  the  Johns  Hopkins  Applied  Physics  Laboratory 
(APL)  obtained  28  W-hr/lb  rotor  energy  density  in  subscale 
experiments  with  bar-type  filamentary  flywheels.  It  should 
be  recognized  that  the  weight  added  by  the  housing,  power 
coupling  system,  bearings  and  ancillary  components  detracts  from 
the  overall  energy  and  power  density  of  the  complete  storage 
system  assembly.  Since  the  rotor  is  the  most  critical  component, 
most  work  done  to  date  has  concentrated  on  improving  its 
performance . 
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The  Lockheed  work  concentrated  on  metal  flywheels  of  various 
materials  and  configurations.  Pierced  and  solid  disk  and  conical 
and  constant  stress  exponential  cross-section  designs  were 
examined.  Materials  considered  included  maraging  steel,  1020 
and  1040  steel,  4340  steel,  and  2021-T81  and  2024-T851  aluminum. 
Several  experiments  were  also  conducted  with  E-glass  and  S-glass 
bar  type  composite  wheels.  On  the  basis  of  minimum  weight  and 
cost,  Lockheed  selected  4340  steel  in  a modified  exponential 
constant -stress  disk  configuration  as  the  best  among  the 
combinations  analyzed.  Two  46-lb  wheels  designed  to  operate 
at  24,000  rpm  were  built  and  tested.  One  of  these  was  tested 
to  destruction  after  spindown  and  acoustic  tests  were  conducted. 
Disintegration  occurred  at  a speed  in  excess  of  35,000  rpm  at  a 
stored  kinetic  energy  level  of  l.lkW-hr  which  represents  an 
energy  density  of  26.1  W-hr/lb  for  the  20.4-in.  diam. , 42.4-lb 
wheel . 

Work  at  APL  was  confined  to  an  investigation  of  composite 
wheels  using  boron,  graphite.  E-glass,  and  R-glass  filaments. 

A large  number  of  early  tests  were  performed  on  small  rod  con- 
figurations using  epoxy,  RTV,  acrylic  and  tube -supported  mounting 
systems  to  evaluate  the  ultimate  performance  of  the  materials  and 
to  verify  the  operation  of  the  test  instrumentation.  In  these 
tests,  a 0.004-in.  diameter  boron  filament  weighing  0.00035  Ibs/in 
displayed  the  highest  energy  density  of  all  the  materials  tested 
at  48  W-hr/lb  without  failing.  For  reasons  of  lower  ultimate 
cost,  subsequent  1-lb  bar  tests  were  limited  to  graphite/polyester, 
graphite/epoxy,  and  S-glass/epoxy  composites.  In  the  best  of  a 
series  of  five  tests,  a 30-in.  diam.  S-glass  epoxy  wheel  ex- 
hibited a 28  W-hr/lb  energy  density.  APL  found  that  flywheel 
failures  occurred  at  71%  of  the  static  tensile  stress  failure 
levels  measured  for  S-glass/epoxy  composites  and  at  81%  of  those 
measured  for  graphite/epoxy  systems.  The  premature  failure  stress 
is  attributed  to  fabrication  practices  used  in  the  preparation 
of  the  experimental  specimens  which  resulted  in  fiber  misalignment 
and  cut  surface  fibers. 
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The  containment  ring  required  for  the  metal  rotors  will 
probably  be  much  heavier  than  that  for  composite  rotors  in  order 
to  resist  the  large  chunks  which  are  characteristic  of  the 
failure  of  homogeneous  rotors.  Lockheed  found  that  a 192-lb 
steel  ring  was  required  to  contain  a 0.86-hp-hr  steel  rotor  burst 
and  that  a 167-lb  composite  ring  could  contain  a 0.46-hp-hr  burst. 
APL  did  not  perform  burst  containment  tests  of  full-scale  wheels, 
but  found  that  the  l/4"-thick  rings  used  in  their  bar  test  series 
successfully  contained  the  bursts  of  the  experimental  composite 
wheels.  They  concluded  that  the  very  low  energy  which  apparently 
transfers  to  the  containment  ring  is  due  to  the  fact  that  the 
composite  rotors  dissipate  a significant  portion  of  their  kinetic 
energy  by  microfracture  of  vaporization  of  the  matrix  material. 

As  part  of  their  test  series,  APL  observed  that  bursts  of  the 
graphite/epoxy  composite  rotors  produced  greater  deformation  of 
the  containment  ring  than  did  bursts  of  S-glass  epoxy  composites. 
This  difference  was  attributed  to  the  rate  at  which  disintegration 
occurs  in  the  two  materials. 

The  sustaining  power  required  to  maintain  the  rotor  within 
its  operational  speed  range  also  detracts  from  the  overall  per- 
formance of  flywheel  energy  storage  systems.  Both  Lockheed  and 
APL  system  designs  use  a mechanical  coupling  between  the  rotor  and 

drive  system;  both  rotor  housings  are  evacuated  to  a vacuum  of 
- 2 - 3 

10  - 10  torr  to  reduce  windage  losses  to  a negligible  level. 

However,  the  required  support  bearings  and  vacuum  seals  can  be 
responsible  for  sustained  power  losses  up  to  3 hp  at  the  maximum 
stored  energy  level,  according  to  Lockheed  calculations  and 
measurements.  These  parasitic  losses  are  similar  in  effect  to, 
but  much  higher  than,  the  self-thermal  losses  of  high- temperature 
battery  systems. 

Many  other  investigators  (Reference  16)  have  been  studying 
the  use  of  various  materials  and  design  concepts  to  maximize  the 
utility  of  the  flywheel  energy  storage  subsubsystem. 
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Sizing  of  Flywheels 
Discussion 

The  hybrid  power  drive  subsystem  concept  considered  herein 
uses  the  series  on-off  engine  operation  mode.  This  concept  re- 
quires that  the  flywheel,  for  efficient  subsystem  operation, 
serve  a double  duty: 


The  sizing  of  the  flywheel  should  include  the  above  cases 
with  the  higher  value  being  selected  for  use  in  the  design  concept. 

Case  I - Flywheel  as  Engine  Starter 

The  flywheel  is  to  be  used  as  a starter  for  the  engine  in 
the  on  operation  mode. 

Flywheel  Inertia  Criteria  in  On-Off  Operation  Mode 
Let  Engine  Speed  = Ng  in  rpm 

Engine  Torque  = T^  in  ft-lbs 

Gear  Ratio  to  Reflect  Flywheel  Inertia 


Case  I 


Oversize  Starter 


Case  II  - Energy  Storage  Accumulator 


to  Drive  Shaft 


(GRp^/f) 


Flywheel  Speed 


Flywheel  Inertia 


Flywheel  forque 


Engine  Inertia 


^FWD  drive  shaft  in  rpm 
in  ft-lbs 

Ig  in  Ib-ft-sec/rpm 
Ip^  in  Ib-ft-sec/rpm 


Assume  Engine  to  be  Started  by  Flywheel 

Engine  acceleration  due  to  clutch  torque,  Tj- 


Ne  = "^C^^E  rpm/sec 


(B-1) 
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Flywheel  deceleration  due  to  clutch  torque, 


^FWD  '^C'^ ^ FW  ^*^^FW/E  ^ 


(B-2) 


Assume  Synchronizing  Speed  = Ng 


Ns  Ng  • Ig 

Synchronizing  time  t^  = — = — 

Ng  A 

Solving  for  Ng  by  Combining  Equations  (B-1)  through  (B-3) 

^S  " ^FWdI^^FW*^‘^^FW/E^  ^/[^E  ^FWD  ^ 

Let  the  Energy  Originally  Stored  in  the  Flywheel  be: 
(ENERGY)  = -2  Ip^CGRp^^p  • Np^^) 

After  Clutch  Engagement  and  Subsequent  Engine  Start-Up 
The  final  energy  = j [Ig  + ^fW^^%W/E^  ^ 

1 2 2 ^FW^*^^FW/F^ 

(ENERGY)piY  = y [ ^FW ^*^^FW/F.^  ^ ^^FWD  ^ I m TT  ^ 


If/^fw*^‘^%w/e^ 


Energy  Lost  in  Synchronization: 

LOST  ENERGYp^  = (ENERGY)  p^  - (ENERGY) 


Ratio  to  original  = [■ 


^E'*'^FW*^‘^^FW/E^ 


r] 


Let 


2 

To  minimize  loss,  IfW*^^^FW/E^  ^ ^E 

Minimum  drive  shaft  speed  for  eng ine - flywheel  clutch 
engagement  = Nj^gpg 


(B-3) 


(B-4) 


(B-5) 


(B-6) 


(C-7) 


(B-8) 


(B-9) 


(B-10) 
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Critical  minimum  drive  shaft  speed  = 

I 

(Below  this  speed,  flywheel  will  not  have 
sufficient  energy  stored  to  accomplish  anything.) 

From  Equations  (B-7)  through  (B-9): 


E'  L 


DSMS 


(B-lla) 


The  maximum  rated  flywheel  speed  (at  the  flywheel)  is  set  at 

= 11,000  rpm 


The  following  limiting  values  are  established  for  this  study: 


FJj^gTs  i f 200  rpm 
^DSMS  ~ 1,050  rpm 


Thus 

= 3-  267  Ig  (B-llb) 

For  the  types  of  engines  used  in  this  program: 

Ip  = 14  Ib-in-sec^ 


typical  of  current  Detroit  Diesel  engines. 

Then  from  Equation  (B-11): 

Ifw<^'^^FW/E^^  = . 12  22  Ib-ft-sec/rpm  (B-12) 


Case  II  - Sizing  of  Flywheel  as  an  Energy  Storage  Accumulator 
During  Driving  Cycle(s) 


Drive  Whee 
Let 

^ACCE 

^DRAG 


1 Power  Requirements 
= drive  wheel  power 
= power  required  for 
= power  loss  due  to 


in  Ib-ft/sec 
vehicle  acceleration 
air  drag  in  Ib-ft/sec 


in  Ib-ft/sec 
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^RDRES 

VGW 

ACC 

g 

Ap 

V 

y 


power  loss  due  to  road  resistance  in  Ib-ft/sec 

vehicle  gross  weight  in  lb 

initial  vehicle  acceleration  in  mph/s 

2 

gravity  constant  = 32.1739  £t/sec 
air  drag  coefficient  - non  dimensional 
vehicle  frontal  area  in  square  feet 
vehicle  velocity  in  mph 

road  resistance  coefficient  - non  dimensional 


Air  Drag  Power 

Pdrac  = - 002556  (Cj^)  (Ap)  (V^)  (B-13) 

Road  Resistance  Power 


^RDRES  y(VCW)(V) 

= [.  005  + 5. 45  (1. 466V)^'^J  (10"^)  (VCW) (V)  (B-14) 

Acceleration  Power 

Pacce  " (VCW/C) (1.4667 (ACC)) (V)  (B-15) 

Drive  Wheel  Power 

^WH  " ^ACCE  ^DRAC  ^RDRES  (B-16) 


Let 

Net  engine  power  at  engine  flywheel  = 

PcxTr  = CROSS  ENGINE  POWER  - ENGINE  ACCESS.  POWER 
ENG 


Flywheel  charging  power  = Pp^jj^ 

Power  extracted  from  flywheel  = Pp^^^Qy-p  * 

Transmission  efficiency  involved  in  charging  = Pp 

Flywheel  power  drive  efficiency  = Pp  ■ 
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Engine  on-o££  coe££icient 
B = 0 engine  o££ 

B = 1 engine  on 


The  net  horsepower  extracted  £rom  the  £lywheel  sha£t 

is  the  di££erence  between  the  vehicle  power  requirement  and  the 
power  supplied  by  the  engine: 

^FWOUT  ^A/C  ’ ^ ^^ENG  ^ (B“17) 


^A/C 


power  requirement  £or  air 


During  deceleration  the  power  regenerated 
sha£t  is  de£ined  by: 


conditioning,  etc. 
at  the  £lywheel 


^REG  ’^^DECEL^ 


(B-18) 


where  Pj^  is  the  average  regeneration  transmission  e££iciency. 

The  change  in  B £rom  0 to  1 is  set  to  occur  when  the  £lywheel 
speed  drops  to  a minimum  o£  501  o£  maximum  rated  speed. 

Let 

Total  time  during  which  power  is  expended  = tp  sec 

Energy  expended,  E^^p  = (Pp^Q^p) (tp) (3. 766  x 10  (B-19) 

in  kW-hr 


Energy  Storage 

^EXP  " T ^FW^^O  " ^1  ^ 


where 


Assume 

Let 

Then  E 


Wi/Wq 

^FW 


K 


EXP 


Flywheel  speed  Fully  charged  in  rpm 
minimum  Flywheel  threshold  speed  in  rpm 

= .50 

Flywheel  moment  oF  inertia  in  Ib-Ft-sec 
(2'^/60)  ^ 

(.004112) (Ip^) (Wp^) 


(B-20) 


(B-21) 


B-15 


Equating  Equations  (B-19)  and  (B-21)  and  solving  for  I 
yields : 


= (7.825x10^)  (Pp^^Q^p)  (tp)Wp2-^  Ib-ft^ 

(B-22) 

Correcting 

for  flywheel  installation  losses,  " .707 

Ip^^  = (l.lOSxlO^)  (Pp^Q^p)  (tp)/WQ^in  Ib-ft^ 

(B-23) 

Assume 

Atp  = time  increment  wherein  power  is  expended 
Np,y  = number  of  cycles  during  time  tp 

Then 

^E  " *^^CY^ 

(B-24) 

F inally 

IpW  ~ (1.105x10  ) [ (Pp^Qup)  /^Q  ] 

(B-25) 

Correcting  Equation  (B-25)  to  be  reflected  at  the  drive  shaft 

2. 


IplV  “ ^ f ^^FWOUT^  ^^^E^ 

in  Ib-f t-sec/rpm 


(B-26) 


where 


W. 


DS 


= drive  shaft  rpm 


GR 


FW/E 


= gear  ratio  between  engine  and  flywheel 


The  weight  of  the  flywheel  rotor  corresponding  to  the  moment 
of  inertia  calculated  from  Equation  (B-25),  can  be  determined 
using  the  following  empirical  relationship. 


where 


ROT  OR 


Kw  = .70 


(B-27) 


For  the  Case  I driving  cycle,  and  assuming 

Ncy  = 3 


Eexp/CYCLE  = .628  x 10° 
TOTAL  Epxp  = 1.884  x lo‘ 


W 


Q = 11,000  rpm 


B-16 


From  Equation  (B-25) 


Ip^  = (1.105x10^)  (1.884xl0^)/121xl0^  = 172.05  lb-£t^ 

From  Equation  (B-26) 

Ip^  = 14  Ib-ft-sec/rpm 

From  Equation  (B-27) 

Wj^OtoR  " 172. 05/. 70  = 246  lbs 

The  miscellaneous  hardware  weight  consisting  of  shafting, 
bearings,  housing,  containment  ring,  etc.  is  estimated  at  5 times 

%0T0R* 

The  miscellaneous  installation  weight  consisting  of  trans- 
mission between  engine  and  flywheel,  housing,  supports,  etc.  is 
estimated  as  a fixed  quantity  at  724  pounds. 

The  total  flywheel  installation  subsystem  weight  is 
estimated  as  follows: 

Rotor  weight  = 246  lbs 

Miscellaneous  hardware  weight  = 1,230  lbs 
Miscellaneous  installation  weight  = 724  lbs 

TOTAL  2,200  lbs 
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APPENDIX  C 

ENGINEERING  LIMIT  PERFORMANCE 
OF  TRANSIT  BUSES 
OVER  URBAN  DRIVE  CYCLES 


This  appendix  consists  o£  an 
Engineering  Limit  Performance  of 
Transit  Buses  developed  by 
Professor  A. T.  McDonald, 

Purdue  University,  School  of 
Eng ineer ing 
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FIGURE  C-1,  TRACTIVE  POWER  REQUIREMENTS  FOR  TRANSIT  COACH 


TOTAL  POWER  REQUIRED  (hp) 


300 


FIGURE  C-2.  PROFILE  OF  TRACTION  POWER  AS  A FUNCTION  OF  TIME  FOR 
CYCLE  C AT  8 STOPS  PER  MILE 
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FUEL  ECONOMY  (mpg)  FUEL  ECONOMY  (mpg) 


FIGURE  C-3.  MAXIMUM  PRACTICAL  FUEL  ECONOMY  LIMIT  FOR  OPERATION 
WITHOUT  STOPS  AS  A FUNCTION  OF  CRUISE  SPEED 
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FIGURE  C-4.  ENGINEERING  LIMIT  FUEL  ECONOMY  WITH  REGENERATION 
FOR  TRANSIT  COACH  OPERATING  ON  CYCLE  C AS  A FUNCTION  OF  NUMBER 
OF  STOPS  PER  MILE  (1  of  2) 
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FIGURE  C-4.  ENGINEERING  LIMIT  FUEL  ECONOMY  WITH  REGENERATION  FOR  TRANSIT  COACH 
OPERATING  ON  CYCLE  C AS  A FUNCTION  OF  NUMBER  OF  STOPS  PER  MILE  (2  o£  2) 


FIGURE  C-5,  ENGINEERING  LIMIT  FUEL  ECONOMY  WITHOUT 
REGENERATION  FOR  TRANSIT  COACH  OPERATING  ON  CYCLE  C 
AS  A FUNCTION  OF  NUMBER  OF  STOPS  PER  MILE  (1  of  2) 
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FIGURE  C-5.  ENGINEERING  LIMIT  FUEL  ECONOMY  WITHOUT  REGENERATION  FOR  TRANSH 
COACH  OPERATING  ON  CYCLE  C AS  A FUNCTION  OF  NUMBER  OF  STOPS  PER  MILE  (2  o£ 


APPENDIX  D 

COMPUTER  PROGRAM  NOMENCLATURE 
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Subroutine  name:  AUTOHB 


Type  of  subroutine:  Component  subroutine 

Description:  Subroutine  to  simulate  the  driver  and  to 

determine  new  vehicle  velocity  and  the 
new  desired  driveshaft  torque  for  the 
next  point  in  the  driving  cycle. 


AEPA 

DELT 

GR 

RATKLS 

TMAX 

T9 ICON 

T9I1GR 

VEPA 

VVDF 

WDFD 

WDM  I 

WIDRR 

WOS 


acceleration  required  to  reach  next  cycle  velocity 
time  difference  between  next  cycle  point  and 
current  time 

gear  ratio  from  engine  to  rear  wheels 

rear  axle  torque  loss 

maximum  steady  state  engine  torque 

new  required  driveshaft  torque 

equivalent  rear  axle  gear  ratio 

required  cycle  velocity 

vehicle  road  load 

vehicle  road  load 

inertial  vehicle  mass 

time  radius 

vehicle  velocity 


I 


K 
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Subrout j,ne  na.me;  CONTHB 


Type  o€  subroutine;  control  subroutine 


Description : 

Subroutine  to  control  the  engine  and 

flywheel  torque  depending  on  the  operating 


modes  of  the  hybrid  car. 

DF 

flywheel  speed 

DFSTOP 

flywheel  speed  at  which  engine  shuts  off 

DFSTRT 

flywheel  speed  at  which  engine  starts 

ENGSTP(l) 

maximum  flywheel  speed 

FINTRQ 

torque  from  engine  (or  starter  motor)  to  flywheel 

lEIJGIN 

mode  of  operation  of  engine-flywheel  system 

2.  Engine  charging  flywheel 

3.  Flywheel  starting  engine 

4.  Engine  off 

ISWl 

engine  on-off.  0-off,  -1-on. 

ISW2 

torque  flow  from  flywheel  to  engine.  0-no,  -1-yes 

PAON 

engine  speed  (rpm) 

RFINR 

system  inertia  (1/RIF  or  1/RIEPIF) 

WOS 

vehicle  speed  (mph) 
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Subroutine  na.it\e ; CVTGNU 


Type  of  subroutine:  Component  subroutine 


Description : 

AlCVT 

CVTLS 

CVTSCL 

CVTTRQ 

GNU 

ICLUCH 

IGEAR 

R 

RMIN 

RP 

RPP 

SPDIN 

SPUMP 

TC 

TCLULS 

TCVTLS 

TLPUMP 

TMAX 

TTRIN 

T9IC 


Subroutine  to  calculate  flywheel  torque 
losses  in  the  CVT,  clutch,  and  driveshaft. 
ratio  of  hydraulic  pump  input  speed  to  CVT 
input  speed, 
torque  loss  in  CVT 
CVT  scale 

torque  at  driveshaft  which  will  be  transmitted 
to  flywheel 
CVT  efficiency 
clutch  indicator,  0 if  open,  1 if  closed  or  slippin 
shift  indicator.  0 if  neutral 
ratio  of  driveshaft  speed  to  flywheel  speed 
minimum  system  ratio 
the  CVT  ratio 

the  new  transmission  ratio 
driveshaft  speed 
input  speed  of  hydraulic  pump 
output  torque  of  CVT 
torque  loss  in  clutch  at  flywheel 
equivalent  torque  loss  in  CVT  at  flywheel 
charge  pump  loss  at  flywheel 
maximum  engine  torque 

torque  in  shaft  between  the  4-speed  transmission 
and  CVT 

driveshaft  torque 

driveshaft  speed 
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T9  IN 


Subroutine  name : DSTORQ 


! 


} I Type  of  subroutine: 

! I 

} I Description : 
r 


f 


Component  subroutine 

Subroutine  to  calculate  driveshaft  torque 
and  the  next  desired  torque  command  and 
brake  setting 


BS 

' ICLUCII 

IGEAR 

RP 

I;  TMAX 

I TNUM 

TS 

I 

: T8I1GR 

T9IC 
T9  ICON 
T90N 
WI2BR 


brake  setting 

clutch  indicator,  0 if  open,  1 if  closed  or 
slipping 

gear  shift  indicator 
CVT  ratio 

maximum  steady  state  engine  torque 

rear  axle  torque 

throttle  setting 

nominal  rear  axle  ratio 

driveshaft  torque 

new  required  driveshaft  torque 

rear  axle  speed 

brake  constant 
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Subroutine  name;  ENGINI 


Type  of  subroutine;  Initialization 

Description;  Subroutine  used  for  initializing  engine 


FINTRQ  - 
ISWl 
ISW2 
PAOC 

PAOFR  - 
PPOB 

SSTORQ  - 


torgue  from  engine  (or  starter  motor)  to  flywheel, 
engine  on-off.  0 - off,  -1  - on. 

torgue  flow  from  flywheel  to  engine.  0 - no,  -1  - 

engine  shaft  torque 

fuel  consumption  rates  (lb.  1 hr.) 

engine  vacuum  (in  -Hg) 

STEADY  STATE  TORQUE 
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yes. 


Subroutine  name:  ENGWHL 


Type  of  subroutine:  Component  subroutine 

Description:  Subroutine  to  integrate  flywheel  speed 

and  engine  speed. 

I Input  variables: 


i CVTTRQ 

torque  at  driveshaft  which  will  be  transmitted 
to  the  flywheel 

DT 

- 

time  increment  ( = .05  sec.) 

EDRAG 

- 

engine  drag  coefficient 

EGAIN 

- 

engine  gain 

ENGTORQ 

torque  supplied  by  engine  at  a given  speed  and 
throttle  setting.  Taken  from  throttle  map. 

FINTRQ 

— 

torque  from  engine  (or  starter  motor)  to 
flywheel . 

lENGIN 

Mode  of  operation  of  engine  flywheel  system. 

2.  Engine  charging  flywheel 

3.  Flywheel  starting  engine 

4.  Engine  off 

ISWl 

- 

engine  on-off.  0-off,  -1-on. 

ISW2 

- 

torque  flow  from  flywheel  to  engine.  0-no,  -1-yes 

PAOC 

- 

engine  shaft  torque 

PAON 

- 

engine  speed 

PERLOS 

- 

% loss  in  flywheel  gears 

R 

- 

ratio  of  driveshaft  speed  to  flywheel  speed 

RFINR 

- 

System  inertia  (1/RIF  or  1/RIEPIF) 

RIEINV 

- 

inverse  of  engine  inertia 

TCLSS 

- 

torque  loss  in  four  speed  transmission  reflected 
to  the  flywheel 

ENGWHL  Subroutine 
Pa,ge  2 


TCLULS 

torque  loss  in  the  clutch  at  the  flywheel 

TCVTLS 

equivalent  torque  loss  in  CVT  at  flywheel 

TLPUMP 

charge  pump  loss  at  flywheel 

T9IN 

Driveshaft  speed  (between  CVT  & rear  axle) 

corrected  for  tire  growth 

Output  Variables: 


A(l) 

power  generated  by  engine 

A{2) 

power  required  by  road  load 

A{3) 

power  lost  in  CVT 

A(4) 

power  lost  in  clutch 

A(5) 

power  lost  in  excess  braking 

A(6) 

power  output  from  system 

A(7) 

power  lost  in  rear  axle 

A{8) 

power  lost  in  starting  the  engine 

A(9) 

power  lost  to  flywheel  friction 

A(10) 

power  lost  in  flywheel  gear 

AA(1) 

power  lost  in  transmission  gears 

AA(2) 

power  used  by  transmission  charge  pump 

Other  program  variables: 


DFINT 

change  in  flywheel  speed  over  the  integration 

period 


DFDOT 

f lywheel  acceleration 

DTF 

time  increment  for  integrating  flywheel  acceleration 

ENTORQ 

torque  on  flywheel  to  accelerate  engine 

ESDOT 

derivative  of  engine  speed 

D-8 

ENGWHL 

3 

Subroutine 

FLYGRL 

- flywheel  gear  loss 

NOT 

number  of  times  flywheel  power  out  is  calculated 

before  average  is  taken  and  integrated  for 


energy  out. 

RGNTRQ 

regenerative  braking  torque 

TFTORQ 

torque  on  flywheel  demanded  by  drivetrain  - 

also  includes  torque  for  accelerating  engine 
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Subroutine  name:  EPA^/EL 


Type  of  subroutine:  System  computation 

Description:  EPAVEL  retrieves  the  appropriate  velocity 

as  a function  of  time  and  supplies  it 
to  the  automatic  driver. 

Input  variables: 

IVEPA  (I)  - cycle  velocities  at  1 second  intervals 

TIME  - time  from  start  of  driving  cycle  (sec.) 


Output  variables: 


DELT 


ICYEND 

VEPA 


time  difference  between  next  cycle  point 
and  current  time. 

used  as  a flag  to  indicate  the  end  of  the  cycle, 
next  reauired  cycle  velocity 


Other  program  variables: 


DELMIH 

DT 

FLOAT ( I ) 
NVEPA 


automatic  drive  minimum  lead  time 
time  of  one  clock  pulse 

treat  the  integer  variable  I as  a real  variable 
number  of  velocities  specified  in  driving 
cycle 


IVEL 


KPLACE  variables  used  to  pack  and  unpack  two  cycle 

KREM  velocities  per  word  of  core 
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Subrout].ne  name; 


FSPEED 


Type  of  subroutine; 
Description; 


Interpolation 

Subroutine  to  provide  interpolation  for 
engine  parameters. 
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Subroutine  name;  GRSHFT 


Type  of  subroutine : Component  subroutine 

Description:  Subroutine  to  simulate  gear  shift 


AEPA 

DT 

ICLUCH 

IGEAR 

INEXT 

NGEAR 

R 

RMAX 

RMIN 

RP 

RPMAX 

RPMIN 

RPP 

STIME 

TIMINT 

TRMAX 

TRMIN 

T9 ICON 


acceleration  required  to  reach  next  cycle  velocity 
time  of  one  clock  pulse 

clutch  indicator,  0 if  open,  1 if  closed  or  slipping! 
current  gear  zero  if  neutral  , 

the  next  transmission  gear 
number  of  gears 

ratio  of  driveshaft  speed  to  flywheel  speed 
maximum  allowable  transmission  system  ratio 

minimum  allowable  transmission  system  ratio  i 

the  CVT  ratio 

maximum  allowable  CVT  ratio. 

minimum  allowable  CVT  ratio  [ 

the  new  transmission  ratio 

I 

time  interval  between  checks  for  shift 
time  interval 

maximum  overall  gear  ratio  (flywheel  to  drive- 

i| 

I 

shaft)  for  the  current  gear 

minimum  overall  gear  ratio  (flywheel  to  drive- 
shaft)  for  the  current  gear.  ^ 

new  required  driveshaft  torque  j 


D-12 


Subroutine  najne;  HYBLSS 

Type  of  subroutine: 
Description : 


Input 

variables : 

A (1) 

I 

4- 

same  as  ENGWHL 

IaA  (6) 

CVTTRQ 

- 

torque  at  driveshaft  which 

will 

be 

transmitted 

to  the  flywheel 

DELTA 

- 

integration  time  increment 

(sec 

.) 

RATKLS 

- 

rear  axle  torque  loss 

T9IC 

- 

driveshaft  torque  (between 

CVT 

and 

rear  axle) 

T9  IN 

- 

driveshaft  speed 

WDF 

- 

vehicle  road  load  force  at 

the 

road 

interface  (lb) 

WOS 

— 

vehicle  speed  (mph) 

Output  variables: 

C (1) 

-i-  same  as  ENGWHL  but  substitute  energy  for  power. 

C (6) 

Other  variables: 

DELCON  - 2 delta/5252 

RACON  - vehicle  speed  (ft/sec) 


Computing  Subroutine 

Subroutine  to  calculate  energy  losses 
in  the  hybrid  car. 
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Subroutine  name:  INCNHB 


Type  of  subroutine:  Initialization 


Description : 


ADDCON (9) 

AVIB 

AVIM 

AVIR 

AlCVT 

COMM { I ) 
CVTSCL 
DACCON (10) 
DELMIN 
DT 

EDRAG 


This  subroutine  reads  in  all  maps  and 
tables  needed  by  the  system  computation 
routines.  It  reads  in  all  constants  that 
are  required  and  calculates  other  constant 
as  necessary.  It  sets  the  ADC  and  DAC  con 
version  constants.  It  also  calculates  ac- 
celeration limits  of  the  vehicle,  account- 
ing for  weight  transfer. 

ADC  conversion  constants 
air  pressure  (psi) 
air  density  (Ib/ft^) 
air  temperature  (°F) 

ratio  of  hydraulic  pump  input  speed  to  CVT 
input  speed, 
title  cards 
CVT  scale 

DAC  conversion  constants 
automatic  drive  minimum  lead  time  (sec) 
value  of  one  clock  pulse  (sec) 
engine  internal  drag  coefficient 


EFFTAB(I,J,K)  - CVT  torque  loss  table  (ft-lb) 


EGAIN 
ENGFUL (I) 
ENGSTP (1) 
ENGSTT  (I) 


engine  gain 

engine  fuel  consumption  map  (BSFC  vs.  rpm) 
maximum  flywheel  speed  (rpm) 
minimum  flywheel  speed  vs.  vehicle  speed 
(rpm  vs.  mph) 
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INCNHB  Subroutine 
Page  2 


ENGTRQ (I) 

engine  torque  map  (ft-lb  vs.  rpm) 

ENGVAC ( I ) 

manifold  vacuum  map  (in  Hg  vs.  rpm) 

EPS 

used  to  test  for  constant  engine  speed  (rpm) 

FDRAG 

flywheel  drag 

FUELWT 

weight  of  1 gallon  of  fuel  (lb) 

FUIDL 

fuel  consumption  at  idle  (Ibm/hr) 

GAIN 

- gain  for  VEDYNH 

GEREFF  (I) 

table  of  gear  efficiencies  for  each  gear  of 

the  manual  transmission 


GRATIO (I) 

table  of  gear  ratios  for  the  manual  transmission 

HRPSEC 

hours  per  second 

lOUT 

number  of  cloclc  pulses  allowed  between  outputs 

IVEPA 

driving  cycle  velocities  at  1 second  intervals 

LOADEQ 

road  load  calculation  control 

MAXLIN 

lines  per  page 

NDIM(2) 

number  of  variables  used  in  joint  probability 

density 


NGEAR 

number  of  gears 

NSPEED 

number  of  speed  increments  in  throttle  map 

NTIMES 

number  of  velocities 

NVEL 

number  of  velocities 

NVEPA 

number  of  velocities  specified  in  driving  cycle 

PERLOS 

% loss  in  flywheel  gears 

PMAX (1) 

maximum  torque  for  PRBDHB  (ft-lb) 

PMAX  (2  ) 

maximum  engine  speed  for  PRBDHB  (rpm) 

RAEFTB (I , J) 

rear  axle  efficiency  table 

RASCAL 

rear  axle  scale 
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INCNHB  Subroutine 
Page  3 


RIE 

2 

rotary  engine  inertia  (Ibm-ft  ) 

RIEINV 

inverse  engine  inertia 

RIEPIF 

engine  inertia  plus  flywheel  inertia 

RIF 

flywheel  inertia 

RMAX 

maximum  allowable  transmission  system  ratio 

RMAXAS (I) 

maximum  overall  gear  ratio  (from  flywheel  to 

driveshaft)  for  gear  I 


RMIN 

- minimum  allowable  transmission  system  ratio 

RMINAS ( I ) 

minimum  overall  gear  ratio  (from  flywheel  to 

driveshaft)  for  gear  I 


RPMAX 

maximum  allowable  CVT  ratio 

RPMIN 

minimum  allowable  CVT  ratio 

SPDING 

speed  increment  for  reading  throttle  map  (rpm) 

TIMING 

not  used 

TMAX 

- maximum  steady  state  engine  torque  (ft-lb) 

TRQIDL 

engine  torque  at  idle  (ft-lb) 

TVICRL 

road  load  torque  at  driveshaft  (ft-lb) 

TVIJCT 

2 

polar  moment  of  torque  converter  turbine  (Ibm-ft  ) 

TVIJRA 

2 

T polar  moment  of  rear  axle  gears  (Ibm-ft  ) 

TVIJTR 

2 

polar  moment  of  transmission  gears  (Ibm-ft  ) 

JVIJTW 

2 

polar  moment  of  tires  and  wheels  (Ibm-ft  ) 

T8INV (10) 

driveshaft  speed  as  a function  of  vehicle 

speed  (rpm  vs.  mph) 


T8I1GR 

- nominal  rear  axle  ratio 

VACIDL 

- manifold  vacuum  at  idle  (in-Hg) 

VACMAX 

maximum  manifold  vacuum  (in-Hg) 

VELINC 

velocity  increment  (mph) 
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IHCNHB  Subroutine 
Puge  4 


VINT(l) 

increment  in  torque  for  PRBDHB  (ft-lb) 

VINT (2) 

increment  in  engine  speed  for  PRBDHB  (rpm) 

VMIN ( 1 ) 

minimum  torque  for  PRBDHB  (ft-lb) 

VMIN ( 2 ) 

minimum  engine  speed  for  PRBDHB  (rpm) 

WIAMX 

maximum  vehicle  acceleration  accounting  for 

weight  transfer  without  tire  slippage 


WIAS 

maximum  vehicle  acceleration  accounting  for 

weight  transfer  with  tires  slipping. 


WIDRR 

- tire  rolling  radius  (ft) 

WIFUM 

coefficient  of  static  tire  friction  (g's) 

WIFUS 

coefficient  of  slipping  tire  friction  (g's) 

WILFR 

2 

- frontal  area  (ft  ) 

WIM 

vehicle  mass  (lb) 

WIMDR 

weight  on  drive  wheels  (lb) 

WIMI 

- inertial  mass  of  vehicle  (lb) . The  read  in 

value  of  WIMI  is  not  used  - it  is  calculated 


instead. 

WISH 

height  of  vehicle  center  of  gravity  (in) 

WISWB 

wheel  base  (in) 

WIICD 

drag  coefficient 

WIICF 

- tire  constant  friction  coefficient 

WIIRF 

rolling  friction  coefficient 

WI2BR 

brake  constant  (usually  static  weight  of  vehicle) 
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Subroutine  name:  INGRHB 


Type  of  subroutine:  Initialization 


Description : 

Subroutine  to  initialize  the  hybrid  car 

after  the  engine  is  in  steady  state. 


AVIO 

grade  angle  (rad) 

AVIS 

windspeed  (mph) 

EMISE 

emissions  (not  used) 

EMISF 

emission  rate  (not  used) 

FUELE 

cumulative  fuel  consumed  (lb) 

ICLOCK 

cumulative  number  of  clock  pulses 

ICLOKO 

time  at  previous  output  of  variables 

ICLOKl 

ICLOCK  at  completion  of  last  integration 

ICLUCH 

clutch  indicator,  0 if  open,  1 if  closed  or 

slipping 


ICYCLE 

number  of  times  the  program  has  iterated 

lENGIN 

mode  of  operation  of  engine  - flywheel  system 

2.  Engine  charging  flywheel 

3.  Flywheel  starting  engine 

4,  Engine  off 

I GEAR 

current  gear 

INDIC 

output  indicator 

INEXT 

the  next  transmission  gear 

IPDX(I,J) 

integer  table  of  probability  density  distribution 

ISEQ 

shift  indicator 

ITICYC 

ICLOCK  at  start  of  driving  cycle 

MGI 

current  gear  number 

NGIOLD 

gear  at  previous  iteration 
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INGRHB  Subroutine 
Page  2 


NGT (1) 

— 

number  of  samples  above  maximum  engine 

NGT (2) 

- 

number  of  samples  above  maximum  torque 

NLINE 

- 

number  of  lines  on  current  page 

NLT (1) 

- 

number  of  samples  below  minimum  engine 

NLT(2) 

- 

number  of  samples  below  minimum  torque 

PAOFR 

- 

fuel  consumption  rate  (Ib/hr) 

PAOFRO 

- 

previous  value  of  PAORR 

RP 

- 

the  CVT  ratio 

RPP 

- 

the  new  transmission  ratio 

TIMAVG(I) 

- 

timer  averages 

TIME 

- 

time  fror\  start  of  driving  cycle  (sec.) 

TIMLEN (I) 

- 

timer  lengths 

TIMMAX(I) 

- 

timer  maximum 

T8DN 

- 

uncorrected  driveshaft  speed 

T9ICDO 

- 

old  desired  driveshaft  torque 

T9  IN 

- 

driveshaft  speed 

T9I1GR 

- 

effective  rear  axle  ratio 

T9  ON 

- 

rear  axle  speed 

VEPA 

- 

next  driving  cycle  velocity 

WOA 

- 

vehicle  acceleration 

WOAO 

- 

previous  value  of  WOA 

WOD 

- 

vehicle  distance  traveled 

WOS 

- 

vehicle  speed  (mph) 

WOSO 

- 

previous  value  of  WOS 

WHLOLD 

- 

previous  value  of  wheel  slip  indicator 

speed 


speed 
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Subroutine  name; 


INGRTH 


Type  of  subroutine:  Computing  subroutine 

Description:  This  subroutine  integrates  vehicle  ac- 

celeration, vehicle  speed  and  fuel  rate 
to  get  vehicle  velocity,  distance  traveled 
and  fuel  expended  respectively.  Velocitv 
is  set  to  zero  if  it  becomes  negative  in 
this  subroutine. 


Input  variables: 


FUELE 

ICLOCK 

ICLOKl 

PAOFR 

PAOFRO 

WOA 

VVOAO 

WOD 

WOS 


fuel  expended 
value  of  system  clock 
last  value  of  system  clock 
new  fuel  rate 
old  fuel  rate 
new  vehicle  acceleration 
old  vehicle  acceleration 
last  distance  traveled 
last  vehicle  speed 


Output  variables 


FUELE 

ICLOKl 

PAOFRO 

WOAO 

WOD 

WOS 

WOSO 


new  fuel  consumed 

current  value  of  system  clock 

old  fuel  rate  for  next  iteration 

old  acceleration  for  next  iteration 

new  distance 

new  velocity 

old  speed  for  next  iteration 
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INGR,TH  Subroutine 


Other  variables; 

DELTA  - integration  time  factor 


HPPSEC 


hours  per  second 
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Subroutine  name:  INVRHB 


Type  of  subroutine:  Initialization 

Description:  Subroutine  to  initialize  the  variables 

for  the  hybrid  car  simulation. 


BS 

- 

brake  setting 

CVTTRQ 

torque  at  driveshaft  which  will  be  transmitted 
to  flywheel 

DELMIN 

- 

automatic  drive  minimum  lead  time 

DF 

- 

flywheel  speed  (rpm) 

DFDOT 

- 

flywheel  acceleration  (rpm/sec) 

ESDOT 

- 

engine  acceleration  (rpm/sec) 

ESDOTO 

- 

previous  value  of  engine  acceleration 

FINTRQ 

- 

torque  from  engine  (or  starter  motor)  to  flywheel 

GNU 

- 

CVT  efficiency 

ICLOCK 

- 

cumulative  number  of  clock  pulses 

ICLOKl 

- 

ICLOCK  at  completion  of  last  integration 

ICYEND 

- 

end  of  driving  cycle  Indicator 

lENGIN 

mode  of  operation  of  engine-flywheel  system 

2.  Engine  charging  flywheel 

3.  Flywheel  starting  engine 

4.  Engine  off 

lENGNO 

- 

state  of  engine  on  last  iteration 

lOLDl 

- 

old  value  of  switch  1 

I0LD2 

- 

old  value  of  switch  2 

ISHIFT 

- 

ICLOCK  at  start  of  last  shift 

ISWl 

- 

engine  on-off.  0 - off,  -1  - on. 

ISW2 

- 

torque  flow  from  flywheel  to  engine.  0-no,  -1-yei 
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INVRHB  Subroutine 
Page  2 


NGI 

current  gear  number 

NGIOLD 

gear  at  previous  iteration 

NREC 

output  record  number 

R 

ratio  of  driveshaft  speed  to  flywheel  speed 

RIEINV 

inverse  of  engine  inertia 

RIF 

flywheel  inertia 

RFINR 

system  inertia  (1/RIF  or  1/RIEPIF) 

TBOIGI 

transmission  gear  index 

TBOIGR 

transmission  gear  ratio 

TCLULS 

torque  loss  in  clutch  at  flyweel 

TCVTLS 

equivalent  torque  loss  in  CVT  at  flywheel 

TIMAVG(I) 

timer  averages 

TIME 

time  from  start  of  driving  cycle  (sec.) 

TIMLEN(I) 

timer  lengths 

TIMMAX(I) 

timer  maximums 

TS 

throttle  setting 

TVEPAO 

time  of  previous  driving  cycle  speed 

T9  IN 

driveshaft  speed 

VANALG 

analog  car  speed 

VAR (10) 

extra  space  for  variables 

VEPAO 

previous  driving  cycle  speed 

WOA 

2 

vehicle  acceleration  (ft/sec  ) 

WOS 

vehicle  speed  (mph) 
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Subroutine  name:  JPBHYB 


Type  of  subroutine:  Output 


Description : 

Subroutine  to  printout  gross  results  of 
the  simulation  for  a complete  run  of  the 
driving  cycle. 

CFMPG 

corrected  fuel  consumption  - connected  for  energy 
left  in  the  flywheel  (mpg) 

EFRIC 

The  sum  of  ELENIN  and  energy  lost  to  flywheel 
friction 

ELEFT 

energy  left  in  the  flywheel 

ELENIN 

energy  lost  to  engine  inertia 

FUMPG 

fuel  consumption  (mpg) 

INT 

increment  in  torque  intervals  for  printout 

INSPEED(I)  - 

interval  storage  for  printout  of  speed  for  joint 
probability  density 

ITOxRQl 

start  of  torque  interval  (for  printout) 

IT0RQ2 

end  of  torque  interval  (for  printout) 

N2 

number  of  speed  intervals  (for  printout) 

SUMJ(I) 

totals  of  joint  probability  distribution  for  each 
speed  interval 

X(J) 

dummy  array  for  tape  or  disc  output 
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Subroutine  name:  MONKEY 


Type  of  subroutine:  Interpolation 


Description: 

Subroutine  to  interpolate  input  torque 

loss  of  a hydrostatic  power  split  trans- 


mission. 

ABS(I) 

absolute  value 

R 

ratio  of  driveshaft  speed  to  flywheel  speed 

RMAX 

maximum  allowable  transmission  system  ratio 

RMIN 

minimum  allowable  transmission  system  ratio 

RP 

the  CVT  ratio 

S 

driveshaft  speed 

STAR (9, 7, 9) 

transmission  torque  loss  for  specific  driveshaft 

torque  driveshaft  speed  and  transmission  ratio. 


T 

output  torque  of  CVT 

TLOS 

torque  loss  in  CVT 
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Subroutine  name;  NUTRAL 


Type  of 

subroutine ; 

Component  subroutine 

Description ; 

Subroutine  to  calculate  torque  in 
rear  axle  due  to  drivetrain  spin 
losses  with  transmission  in  neutral 

CVTR 

ideal  CVT 

ratio 

RAR 

effective 

rear  axle  ratio 

RAS 

rear  axle 

speed 

TAXLE  - 

rear  axle 

torque 
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Subroutine  name:  OTCNHB 


Type  of  subroutine: 
Description ; 


Output 

Subroutine  to  output  constants  for 
hybrid  car  on  a disc  for  performance 
analysis . 
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Subroutine  name:  OTPTHB 


Type  of  subroutine:  Output 

Description:  Subroutine  to  output  hybrid  system 

variables  on  a line  printer  for  eval- 
uation . 

BSFC  - brake  specific  fuel  consumption 

FMPGC  - accumulative  fuel  consumption  (mpg) 

FOBHP  - flywheel  output  horsepower 

NLINE  - number  of  lines  on  current  page 

OBHP  - observed  brake  horsepower 

RIENG  - mode  of  operation  of  engine  - flywheel  system 

2.  Engine  charging  flywheel 

3.  Flywheel  starting  engine 

4.  Engine  off 

TBDlEF  - overall  transmission  efficiency 
T9D1  - rear  axle  efficiency 
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Subroutine  name:  OTVRHB 


Type  of  subroutine: 
Description : 


Output 

Subroutine  to  output  variables  for 
the  hybrid  car  on  a disc  for  perfor 
mance  analysis. 
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Subroutine  name:  PRBDHB 


Type  of  subroutine:  Computing  subroutine 

Description:  This  subroutine  calculates  the  joint 

probability  density  distribution  of 
engine  speed  versus  steady  state  torque 
over  a given  driving  cycle. 


Input  variables; 

VAL (1) 

- 

current  steady  state  torque 

VAL (2) 

-- 

current  engine  speed 

Output 

variables 

• 

• 

IPDX (20 

,20)  - 

new  probability  distribution 

NGT ( 1 ) 

- 

number  of  samples  above  maximum 

engine 

NGT  (2) 

- 

number  of  samples  above  maximum 

torque 

NLT(l) 

- 

number  of  samples  below  minimum 

engine 

NLT  (2) 

- 

number  of  samples  below  minimum 

torque 

Other  varialbes; 

INTI 

- 

torque  index 

INT2 

- 

engine  speed  index 

VINT(l) 

- 

size  of  torque  interval 

VINT (2) 

- 

size  of  engine  speed  interval 

VMAX(l) 

- 

maximum  torque 

VMAX(2) 

- 

maximum  engine  speed 

VMIN (1) 

- 

minimum  torque 

VMIN (2) 

- 

minimum  engine  speed 

speed 


speed 
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Subroutine  name : RAEFFH 


Type  of  subroutine:  component  subroutine 

Description:  Subroutine  to  calculate  rear  axle  torque 

loss . 


I GEAR  - 

gear 

shift 

indicator 

RASCAL  - 

rear 

axle 

scale 

RATKLS  - 

rear 

axle 

torque  loss 

T9IC 

driveshaf t 

torque 

T9I1 

rear 

axle 

efficiency 

T9I1GR  - 

rear 

axle 

ratio  equivalent 

T90C 

rear 

axle 

output  torque. 
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Subroutine  name:  RAXLOS 


Type  of  subroutine : Interpolation 

Description:  Subroutine  to  interpolate  rear  axle 

torque  losses 

RALS  - rear  axle  torque  loss 

STRA  (11,  11)  - rear  axle  torque  loss  table 
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Subroutine  name:  RDEPA 


Type  of  subroutine:  Input 


Description : 

RDEPA  reads  and  stores  the  driving  cycle 

velocities  at  one  second  intervals. 


Input  variables: 

IVEPA(I) 

cycle  velocities  at  one  second  intervals 

ITEMP 

intermediate  variable  for  reading  the  cycle 

points  from  the  cards  (26  points  per  card) 


N 

number  of  cycle  points 

rjREAD 

number  of  cards  to  read  in  cycle  velocities 

NREM 
I DATA 
ITEMP 

number  of  points  to  read  from  last  card 

ITEMP 1 

variables  used  to  pack  and  unpack  two  cycle 

KPLACE 

KREM 

velocities  per  word  of  core 
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Subroutine  name;  READRA 


Type  of  subroutine; 
Description ; 


Input 

Subroutine  to  read  in  the  rear  axle 
efficiency  table  STRA  (I,J)  - rear 
axle  torque  loss  table. 


Subroutine  name;  SIMHBD 

Type  of  subroutine;  Control 


Description ; 

Mainline  of  the  simulation,  including  a 

proper  calling  sequence  for  the  rest  of 


the  routines. 

ATORQS (NFUEL) 

engine  torque  used  in  performance  analysis 

DF 

flywheel  speed 

EPS 

used  to  test  for  constant  engine  speed 

ESPEED (NFUEL) 

engine  speed  used  in  performance  analysis 

FINTRQ 

torque  from  engine  (or  starter  motor)  to  flywheel 

FOBHP 

flywheel  output  horsepower 

FTIME (NFUEL) 

time  used  in  performance  analysis 

ICLOCK 

cumulative  number  of  clock  pulses 

ICLOKO 

time  at  previous  output  of  variables 

ICLOKl 

ICLOCK  at  completion  of  last  integration 

ICYCLE 

number  of  times  the  program  has  iterated 

ICYEND 

end  of  driving  cycle  indicator 

INDIC 

output  indicator 

INISWT 

logic  variable  0 - initialization  of  engine  speed 

complete.  Car  in  first. 

1 - engine  being  initialized. 

Car  in  neutral. 

I READY 

logic  variable  0 - engine  not  in  steady  state 
1 - engine  in  steady  state 

NTIMEP 

time  since  last  printout 

OBHP 

observed  brake  horsepower 

PAOC 

engine  shaft  torque 

PAOFR 

fuel  consumption  rate  (Ib/hr) 
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SIl^HBD  Subroutine 
Pcige  2 


PAON 

engine  speed  (rpm) 

PPOB 

- engine  vacuum  (in  Hg) 

RATE 

flywheel  speed 

RATKLS 

rear  axle  torque  loss 

SSTORQ 

steady  state  engine  torque 

TFTORQ 

total  flywheel  input  torque 

TIME 

time  from  start  of  driving  cycle 

T9IC 

driveshaft  torque 

T9I1GR 

effective  rear  axle  ratio 

T90C 

rear  axle  output  torque 

VAL{1) 

- current  steady  state  torque 

VAL (2) 

current  engine  speed 
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Subroutine  name:  TGG15H 


Type  of  subroutine:  Component  subroutine 


Description : 

Subroutine  to  determine  the  effective 

rear  axle  ratio  and  driveshaft  speed 


Input  variables: 

taking  into  account  tire  growth. 

WOS 

vehicle  speed 

Output  varialbes: 


T9IN 

actual  driveshaft  speed 

T9I1GR 

Other  variables: 

equivalent  rear  axle  ratio 

DIFF 

difference  between  current  vehicle  speed 

and  vehicle  speed  at  lower  interpolation 


points 

T8DN 

uncorrected  driveshaft  speed 

T8DNHI 

upper  interplation  point 

T8DNL0 

lower  interpolation  point 

T8INV(J) 

table  of  driveshaft  speeds 

T8I1GR 

Nominal  rear  axle  ratio 

WIDRR 

time  radius 
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Subroutine  name:  TREFFH 


Type  of  subroutine:  Component  subroutine 

Description:  This  subroutine  calculates  the  torque 

loss  in  the  4 speed  transmission. 


GRATIO(I)  - 
GEREFF(I)  - 

I GEAR 
TCLSS 

TORQ 


table  of  gear  ratios  of  the  manual  transmission 
table  of  gear  efficiencies  for  each  gear  of 
the  manual  transmission 
current  gear 

torque  loss  in  the  4 speed  transmission  re- 
flected to  the  flywheel 

torque  in  shaft  between  4 speed  transmission 


and  CVT. 


Subroutine  name : 


TURKEY 


Type  of  subroutine; 
Description : 

STAR(I,J,K)  - 


Input 

Subroutine  to  read  in  hydrostatic  power- 
split  transmission  efficiency  table, 
transmission  torque  loss  for  specific 
driveshaft  torque,  driveshaft  speed  and 
transmission  gear  ratio 


Input  Torque  Input  Speed  Transmission  Gear  Ratio 

ft-lbf  rpm 


I 

J 

K 

1 

-200 

1 

0 

1 

.224 

2 

-100 

2 

600 

2 

.293 

3 

- 50 

3 

1200 

3 

. 362 

4 

- 25 

4 

1800 

4 

.431 

5 

0 

5 

2400 

5 

. 500 

6 

25 

6 

3000 

6 

.569 

7 

50 

7 

3600 

7 

.638 

8 

100 

8 

. 707 

9 

200 

9 

.776 
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Subroutine  name;  VAL 


Type  of  subroutine; 
Description ; 


Interpolation 

Function  subroutine  to  evaluate  by 
2-dimensional  linear  interpolation  the 
value  of  a point  bounded  by  four  points 
of  known  values. 
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il 


Subroutine  name;  VEDYflH 


Type  of  subroutine;  System  computation 

Description:  This  subroutine  determines  the  vehicle 

acceleration  based  on  the  difference  between 
the  force  driving  the  vehicle  and  the  re- 
sistive forces.  It  also  tests  for  con- 
ditions of  tire  spinning  or  skidding. 


Input  variables; 

AVIO  - wind  speed  (mph) 

TBOIGI  - gear  index 

TBOIGR  - transmission  gear  ratio 

T9I1GR  - equivalent  rear  axle  ratio 

T90C  - rear  axle  output  torque  (ft-lb) 

WIBBR  - brake  setting 

WOS  - vehicle  speed  (mph) 

Output  variables; 

WDF  - vehicle  road  load  force  at  tire  road  interface  (lb) 

WOA  - vehicle  acceleration  (mph/sec) 

Other  program  variables; 


AVIM 

AVIS 

LOADEQ 

R 

SINAVO 
TVICRL (16) 
TVIJCT 


- air  density  (Ib/ft^) 

- wind  speed  (mph) 

- used  in  a logical  manner  to  determine  whether 
road  load  equation  or  D.S.  torque  table  is  used 

- ratio  of  driveshaft  speed  to  flywheel  speed 

- sine  approximation  for  grade  angle 

- road  load  torque  at  driveshaft 

- polar  movement  of  inertia  of  torque  converter 
turbine  (Ibm-ft^) 
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VEDYNH  Subroutine 
Pa,ge  2 


TVIJRA 

2 

- polar  moment  of  inertia  of  rear  axle  (Ibm-ft  ) 

TVIJTR 

" " " transmission  (Ibm-ft^) 

TVIJTW 

" " " rear  wheels  (Ibm-ft^) 

TVIMJ 

- total  rotary  inertia  of  drivetrain  reflected 

to  rear  wheels. 


WDFBR 

- total  resistive  force  acting  on  vehicle  including 

brakes 


WDFN 

- net  force  available  to  accelerate  the  vehicle 

WDMI 

- total  inertial  mass  of  vehicle 

WIAMX 

- maximum  acceleration  based  on  maximum  coefficient 

of  tire  friction  (g's) 


WIAS 

“ maximum  acceleration  based  on  sliding  coefficient 

of  tire  friction  (g's) 


WIDRR 

- tire  radius 

WIFUM 

- coefficient  of  static  tire  friction 

WIFUS 

WILFR 

- coefficient  of  slipping  tire  friction 

2 

- frontal  area  (ft  ) 

WIM 

- vehicle  mass  (lb) 

WIMAX 

- maximum  vehicle  acceleration 

WIICD 

- drag  coefficient 

WIICF 

- tire  coulomb  friction  coefficient 

WIIRF 

- coefficient  of  rolling  friction 

WHLSLP 

- used  in  R.T.  simulation  to  control  tire  slip 

noise  generator. 
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PROGRAM  LIST 


APPENDIX  E 

NG  OF  COMPUTER  SIMULATION 


E-1 


1 

I 

f 


u • 

21 

3|  C- 
-*I  C- 
5i  * 
6}  * 
71  • 
-81 
9| 
lot 
111 

121  " 
131 

141  - 

151 

161 

I7l_ 

1«1 

191 

20)'" 

2lt 

22 1 

231 

241 

251 

261  " 
271 
281 
291 

301  ” 
311 
321 
331 

341  - 
351 
361 
371 

38 1 " 

391 

401'  — 
411 
621 
43l 
441 
45| 

‘461  “ 
471 
481 
49l 
501 
5ll 
521' 
531  • 


• SIMHBD  **** 

SU8BBUT1NC  SIMHBD 
OiaiTAU  tlAINLlNE  FOR  HYBRID  CAR 
R.R.RAOTKE  2/18/75- 


••r 
»»* 

MODIFIED  ON  12  NOV  1936 
modified  8 APRIL  1977  TO  PUT  RUN  NUMBER  ON  OUTPUT  TAPE 

--COMMON  RlEiTMAX#VACMAX#VVtMl4VVlLFR«VVi23R/VVlicD<VVIMjVViiRF 
COMMON  VVlMDR#VVIDRRiAVIB«AVIRiT8IiaR/AVlM«yvIFUtl«WUFU6  . 

COMMON  VYISW6#VVl5H#VVrAMX/VVIA5<yVllCFiTVljCTiTVtJTR«TVIJRA- 

COMMON  TVIjTW/SCALEF/OELMlN<FueLHT<TlDLE*OT  .... 

-COMMON  NVEPA«RUINy>HRPSECjMAXLlN,EPS#NQEARiIOUTiIPRNT<LOADEO 

DIMENSION  TSlNVai)*  iVEPAOOOOl 
DIMENSION  VMIN(2)»VMAX(2)/VINT(2)<NDIM(2) 

DIMENSION  DACC0N<1S)«A0CC0N(19) 

DIMENSION  TVrCRL(16T  

COMMON  T81NV 


COMMONOl- 

C0HM0ND2 

C0MMONO3— 

C0MM0N04 

COMMONOB— 

COMMON  6 

C0MM0N07- 

C0MM0N08 

C0MM0N09- 

COMMONIO 

COMMONll- 

C0MM0N12 

COMMONir- 

C0MM0N14 


'COMMON  lVEPAjVMIN,VMAX*VINT/NDIMjDACCONiADCCON4TVICRL 
COMMON  TiMEiNRUN/ INDIC<NRECaNFUEL« ICL0CK« ICLOKOiTS^BB^OBHPiTBRO 
"COMMON  S8T0RQiES00TiPAQCjPA0N<PP0B*TA0C<TABN  - - - 

C0MM9N  T9lC/T9lN<T8DN<T9eC*T98N  . . . 

-COMMON' 'TOUjTgilQRiWBSiVVOAiVVODiAVlO^AVlSi  TVIMJ^VVDFiVVOMNPAOFRCBMMONlB 
COMMON  FUELE* ITICYC<1CUOx1*I8HIFTiWMLSLPaWHL0UD.  . COMMON16 

'COMMON  iCYENO/NLINEi ICYCLEiNQI jNGIOLO/ VEPA« VANALGiPAOFRO^ VVOAO  “ ' COMMONIT 
COMMON  VVesOiDELTAjDELTi ISEQ/IGOiESOOTO#lQEAR  C0MM0N18 

"EQUIVALENCE  (DIST«VV001i (BS/VVIBBR I . . . C0MM0N19 

DIMENSION  FTIME(60)«ESPEED(60)iATeRQS(601«VAR(10)iX(22S)iNV6LT<15ICOMMON20 

' DIMENSION -VALfEI/NLTtajiNaTtBl/IPOXfEOjSOl/ISPEEDtEOlATlMMAX (51 C0MM0N2t 

dimension  T1MLEN(5)*TIMAV0(6)  C0MM0N22 

■ COMMON  V*R»XiNV8LT«VAL/NLT/NQT«IPDX<lapEE0/TIMMAXiTlMLEN*TIMAV0  COMMON23 
equivalence  (FT!ME(1)4X(46) >4 (ESPEED11)#X(106) >4 IATeRQ8(l)<X(166)IC0MM0N24 
COMMON  t0L0l4l8LD24l0LD34lSWl4lSW24l8W34lENQN04lENQIN  C0MMON25 

common  ElNTRQ4FINTRQ4RIF4RFlNR4DF0eT4eNU4FQNU4TRQI0L4T9ICD4R*DF  C0MM0N26 


-OIMENSION-COMM  (26) /CNQTRQ  120)4  ENSFULt  20)4  EN0VAC1201 4EN98TT 126)- 
OIMENSION  ENGSTP(20)4EFFTAB(94949)4RAEFTB(ll4ll) 

COMMON  C0MM4EN0TR04CN0FULAENQVAC4ENQSTT4ENasTP4EFFTA9 
DIMENSION  A(10)4C(10)  . . . ' 

'COMMON  AiC4FUIDL4VACIDL4NSPEED4NVEL4NTIME84SPDlNC4VELlNC4 TIMING 
COMMON  TFTORQ4RIEPlF4CyTTRQ4l5IM4TSNEW4BSNEw4TaiCDN4T9ICDO 

' COMMON  RP4RPP4F0BHP4TCVTL64-TCLUU64RPMIN4RPMAX4TT4TC4TF  

COMMON  RASCAL4ENT0R04FDRAa4EGAIN4E0RAG4RAEFTB4RATKLS4DTF 
DIMENSION  aRATIOUO) 

COMMON  QRATIO4RMIN4RMAX4 ICLUCH4CVTSCL 
DIMENSION  GEREFF(IO) 

COMMON  /EFFGER/QEREFF 

“COMMON  /flyeff/perlos  

dimension  CC(10)4AA(10) 

COMMON  /SUMVAR/CC4AA 
common  /QRL0SS/TCLSS4TTR1N 
COMMON  /PUMPCQ/TLPUMP 

COMMON/MPG/FMPGI 15)4 CFMP( 16)4 RN4CFMPQ4RWEN4RWHP 


-C0MM0N27- 
C0MM0N28 
C0MM0N29 
COMMONaO 
C0MM0N31- 
CBMM0N32 
-COMMON3J- 
C0MM0N34 
C0MM0N35 
C0MMBN36 
COMMON  - 
COMMON 
-COMMON 


COMMON 

COMMON 


sense  switch  information 


I 


E-2 


54i  • It  PRInTV  8UTPUT 

55|  • 2t  ENQkHl  8UTPUT 

561  • 3t  WINDUP  9PERATI9N 

57;  • 6i  AUTBMATIC  RUNNING  ' ' 

981  • 

591  C-—  RUNIN01C«TBR 

601  NRUN  • 0 

61}  1 continue 

6El  • INITIALIZE  ALL  CONSTANTS  AND  TABLES 

63|  CALL  INCNHB 

64)  C»-'«  INITIALIZE  variables 

65)  CALL'  INVRHB  - 

66)  NRUN«NRUNa1 

671  “ WRITEU6)  NRUN 

68)  INDICvO 

69)  ICYENO'O  ^ ' ■ - 

70i  PUELE.  • OiO 

71)  ' ■ RN  • liO  ■ ^ 

721  GO  TO  60 

731  • 

741  10  continue 

751  IPISENSE  SWITCH  1)  Iltl8 

761  11  CALL  PRINTV 

77l  ' 18  CONTINUE 

781  Ct>f»»  UPDATE  SYSTEM  CLOCK 

79l  1CL0CK*ICL0CK41 

80)  TIME-ICL0CK4DT 

■ 81)  Ci^*-“^AOTOMATTC  driver 
82|  CALL  EPAVEL 

83)  call:  AUTOHB 

84)  c»»««  calculate  actual  orivcshaft  torque 

85)  CALL  DSTORq 

86)  CALL  CONThb 

87)  X»-»r  HORSEpewER - 

881  OBHP  f rlNTRQ«PAON/5282tO 

89)  ■"  PAOC  • SSTORQ  * FINTRO 

901  PAOFR  • OtO 

91)  IFIFINTRO)  30/90/30 

92)  30  CONTINUE 

931  C4—  CALCULATE  FUEL  CONSUMPTION 

94)  # ENQFUL(I)  starts  AT  PAON  • 800  RPM 

95)  PAOFR*06HP*F9PEED(ENGFUL/N8PEEO/SPOlNC/PAON«8OOtO) 

96)  90  continue 

97)  T90C«(T9IC-RATKLS)*T9I1QR 

98)  C-—4  vehicle  Dynamics 

99)  CALL  VEOYNH  ^ 

1001  c««*t  subroutine  to  shift  gears 
1011  CALL  GR6HFT 

102)  C*—  TRANSMISSION  EFFICIENCY 
1031  ■ CALL  CVTQNU 

1041  CALL  TREFFh(TTR1N/T9IC/ICEAR/TCLSS/GRATI0) 

1 05 1 “CiT.V' -integration  subroutine  ■ ■■ 

1061  CALL  ENGWHL 
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107|  CALL  INGRTH 

■ 108;  CAUL  HYBUSS 

109;  C-***  TIRE  GR8WTH  SUBR8UTINE 

no;  CALU''T0QV5H  

Ill;  T99N  • T9IN/T9I1GR 

HE;  C*— * REAR  axle  efficiency 
113;  CALL  RAEFPh 

llA;  C*-»?  J9INT  PROBABILITY  DI8TRIBUTIBN 

Il5l  VAL(1)'SSTBR0 

1161  VAL(E)»PABN  " 

117;  CALL  PRBDHB 

118;  icycle»icycle*i 
119;  NTIMEP  ■ IClSCK.IClOKO 

1201  C— - CHECK  FOR  END  6F  DRIVING  CYCLE 
1311  « icyend  is  set  in  EPAVEL 

122;  rniCYEND. 1)55/90/90  

123;  C»— • check  FbR  OUTPUTS 
124;  55  IF{NTIMER.18UT)10/86/85 

125;  • 

1261  • • INITIALIZATIBN  SECTION  • 

127;  60  CONTINUE 

1281  CAtU“ENQlNI  

1291  • 

1301  " REPEAT  75/, WHILE  OF  < EPS 

1311  CALL  ENQWHL 

132;  75  continue 

1331  • 

■ ■ 134 1"-* IFISENSr  SWITCH  3y  7T/78 

135;  77  continue 

136]  • DP(0)  IS  INCREASED  FROM  900  TO  2200  RPM  IN  WiNDUP 

1371  CALL  WInDuP 

1381  PAON  • 05HP  ■ PABFR  • 0»0 

1391  75  continue  . 

~ 1401  CALL'ENOINI — • ■' 


1411 

142) 

143) 

144) 
145; 

CALI:  INQRhB 

• 

# • 

• t 

END  OF 
OUTPUT 

INITIALIZATION  • 
SECTION  • 

1461 

147) 

55  C6NTINUE 

1481 

CALL  OTPTHB 

1491 

call  otvRhb 

1501 

ICLOKOilCLOCK 

151) 

• 

1521  * * END-OF  output- SECTION-*  “ 

153)  • 

“ 154; GO  TO  10 


1651  • 

1561  • “ • BEGIN  termination  SECTION  * 

157;  • 


1581  SCrCONHNUE 

CALLJTPTHB 


t t • • [ 


1601 

CALC  JPBHYB 

161(  • 

162: 

CAUL  elVRHB 

163; 

- END  r:te-i6  

- ..  _ 

164)  • 

1651  * 

* end  TERNINaTIBN  SECTIBN  • 

“ 

166!  • 

167! 

irCSENSE  SWITCH  6)  laoo 



168; 

100  continue 

169! 

end  file  16 

170] 

rewind  16 

171!  • 

■ ' ‘ 

1721 

RETURN 

173! 

END 

— 

... 

. 

..  

— - --  - 

__  
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tt  • 

21 

3l  C- 
■■  41  •- 
5J  • 

6t 

81  ■ 
9) 

101 

Ui 

12J 

131 

141  ' 

151 
161 
l?l 
181 
191 
201 
211 
221 
231 
241 
291 
261 
271 
'281 
291 
301 
311 
321 
331 
34| 

351 
361 
371 
38) 

39J 
■4or 
411 
421 
43) 

441 
4B| 

461 
47) 

481 
49| 

501 
51! 
"82)- 

53) 

54) 

551 
561 
971 
58| 

59! 


••••  AUT9HB 

SUeRBUTlNE  AUTBHB 

R.RiRADTKE  1/29/75  * 

M90iriED  6N'14  8CT  1976  “ 

C9MH9N  RIE»TMAXjVACMAXj VVlMli VVILFR< Vvi2aR*VVliCD<yVIM<WllRF  C9MM9N01 

CBMMBN  vy:MDR»VVlDRRiAV19»*VlR/T8I10R*AVIM<yVlFUBiyVIFUS  C9MB9N02 

C8MM9N  VVI64B#VVISH/VVIAMX«VVlA6iVVltCpjTVIJCTjTVIJTR«TVIJRA  - ' C9MM8N03 ’ 
CBMMBN  TVIjTW<SCALeF<OEUM)N»FUELWTjTIDLE<OT  ....  CBMMBN04 

"CBMMBN  NVEPA<R:EINV*HRPSECjMAXUlN,EP6>NaE*RA I9UTa IPRNT* LBADEO  C8MMBNO3- 

OIMENSIBN  TSiNVdl)#  IVEPAOOOO)  CBMMBN  6 

OIHENSIBW  VMIN(2)AVMAX(2)/VlNT,(2)<N0lMt2}  C9MMBN07" 

OIMENSIBN  0ACC8N(15)aADCC9N(19)  CBMM9N08 

DlMENSlBN  TVrCRL(16)  " " CBMMBNOB" 

CBMMBN  TllNV  CBMMBNIO 

"CBMMBN" IVEPAaVMTNaVMAX/VINT>NDIM4DACCBN«ADCCBN«TVICRL  CBMMBNll- 

CBMMBN  TlMEiNRUNi InD1C<NRECaNFuELj ICUBCKa IClBKOaTSaBSjBBHP/TBRO  CBMMBN12 
CBMMBN)  SSTflRQ<ES0BT<PABCiPABN/PPBBATA9C«TABN  “ C8MMBN13" 

CBMMBN  T9ICaT9IN<TB0N«T98CaT9BN  . , _ CBMMBN14 

CBMMBN  T9liiT9IlQR#VVBS< VyBAjVVBOiAVlBiAVlSiTVIMJiVVDFiVVOMlAPABrRCBMMBNlS- 

CBMMBN  FUELE/ITICYCaICUBkIaISHIFTjWHLSLPiWHlBLO  C9MMBN16 

"CBMMBNTTCYINDiNLINEilCyCLCiNQIiNaiBUDAVEPAiVANALGiPABFROiVVBAO  CBMMBMtT“ 

CBMMBN  VV6S0<DELTA,0ELT/ISEQiI9B/ESDBT0aIQEAR  CBMMBN18 

EQUIVALENCE  CDIBTj VVBO )< ( BSa VVIBBR I ...  - CBMMBNIB" 

OIMENSIBN  FTIME)60)aESPEED(601«ATBR0S(60IaVAR(1014X1825),NVBIT116ICBMMBN20 
"OIMENSIBN  V6L(2)<NLT(2)iN3Tt2)AlPDX(20A20liISPCED(a0)#TlMMAX(5)—  C8MMBN21 
OIMENSIBN  TIMLENISIaTIMAvOIB)  . CBMMBN22 

■■C0MM9N"V*R,XjNVBLT«yAL“«NLT/NQT<lPDX<ISPEED/TIMMAXiTlMLENAT:MAV0-~  C6MMBN23- 
EOUI valence  (FT1ME(1)4X(46) )< (ESPEE0tl)<X(l06) >4 (AT9RQ6(1)4X(166))CBMMBN24 
CBMMBN ■ I9LD14 IBLD24 IBLD34 ISWI4 1SW2/ ISwJi IENGN84 lENGlN  ' CBMMBN25 

C9MMBN  ElNTR0/FlNTR0/RlF4BFlNR40FDBT>QNUiFQNU«TR0I0L<T9ICD4R4PF  CBMMBN26 

OIMENSIBN  ceMM(.26)4ENQTRQ(20)4ENQFUL(20)/EN8VAC.(20)4ENaSTT(20> 

OIMENSIBN  ENGSTP(20)/EFFTAB(94949)4RAEFTBlll4 11) 

-CBMMBN"  C9MM4  ENQTRQj ENOnJLiENSV AO  EN3BTTJ  EN9STP,  EFFTAB 
dimension  A(10)4C(10)  ... 

CBMMBN  AiCjFUIDL4VACI0L/NSPEED4NVEU<NTIME84SPDINC4VELINCiTIMlNC 
CBMMBN  TFTBRO»RIEPlF4CyTTROAlSIMiTSNEW#BSNEW4T9ICDN4T9ICOB 

CBMMBN  RPjRPPiFBBHPaTCVTlSaTCLULSjRPMINjRPMaX/TTaTCnTF 

CBMMBN  RASCAL4ENTBRQ4F0RAa4ESAIN4EDRAa4RAEFTB4RATKLS40TF 

OIMENSIBN  GRATJB(IO)-"  ": 

CBMMBN  GRATIBiRMINiRMAXilCLUCHiCVTSCL  CBMMBN36 

CBMMBN  /ACCELN/AEPA  ' CBMMBN-  - 

CBMMBN/CVTTBRQ/CVTMAX 

determine  vehicle  ACCELERATIBN  required  T8  reach  next  cycle  VELBClTYi 
AEPATr-(YSPA*VVBS)/DELT - 


VVOFO«VVOF 

IFIVEPA  < Otl  > VV6S) 


VVDFO  • 0«0 


QR«VVI0RR/T911QR 

"TN0M»AEPA«VVDMT*1»46674VVDF0" 

T9IC0N«TMUM»QR*RATkLS 
IF(T9ICPN  < CVTMAX)  RETURN 
T9IC0N  » CVTMAX 


RETURN 

END 


E-6 
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• • • f • • 

1{  • . CQPUMP  ***• 

subroutine  CaPUNP(SPEED/TLOS) 

31  C»****SUBR0UTINE  to  compute  torque  loss  on  CVT  input  Shaft  due  to 

C FIFTY  CUBIC  INCH  PER  REVOLUTION' HYDROSTATIC  TRANSMISSION  

5l  C charge  pump 

61  C»**«*T0M  HAUSENBAUER  8/1975 
7|  • UPDATED  19  JAN  77 

8)  dimension  HPL03S(9)  . .. 

9|  _ DATA  HPLBSS/Ot040>lA<0>2940«47iO«6840i89Al«10<l»37<l«BO/ 

' lOi  * ■ ‘ ^ 

in  IFISPEED  iEQ*  0«0)  TLOS  ■ 0«3«5166i  RETURN 

121  I»(SPEE0/BQ0.)*1 

13l  IF(l  < 1)  I • 1 

1*1  IF(I  > 8l  I * 8 

151  IP»I*1 

1*1  SM*500»«(1*1)  . 

171  PLOS  ? HRLBSS(I)  ♦ O»OO2»<SPEEO?SM)«(HPLOS6(1P).hPL0SS(I)) 

18l  ■ TLOS  • 87B.333»PLBS/SPEED 

19i  RETURN 

201  END  - - . 
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♦ t 

11 

II 

31 

■ *1 
5| 
6l 
7| 
81 
91 

lor 

111 

111 

131 

1*1 

15| 

ur 

17| 
18i 
191 
201  ' 
211 
22f 
231 
2*1 
25| 
261 
27| 

28  r 

301 

311 

321 

331 

3*r 

35| 

361 

371 

381 

391 

*or 

*11 

42| 

*31 

**1 

4B| 

•*6r 

*7J 

*81 

*91 

901 

StI 

“521 

53t 


C.  — • 
C»  — * 


• ••••  C8NTH6  •••• 

subroutine  CONTHB 

subroutine  to  control  engine  and  flywheel  Torque 
R>B.RADTKC  1/29/7B ' 


• “17  NOV  197* 


COMMON  RlE,TMAX<VACMAXiVVlMliVVILFR*VViaBR<VVllCD#VVIM*VVtlRF  COMMONOl^ 

COMMON  VVlMDR*VVI0RR<AVIBiAVIRiT8IlGR#AVlM«VVIFUM<YVIFU6  C0MM0NO2 

'COMMON  VV13WB,VVISH/VVIAMX/VVIAS<VVUCF«TVljCT,TVIJTR*TVrURA  — 'COMM0N03- 
COMMON  TVlJTW/SCALE?<OELMlN<FUELWT/TlDLEiOT  ..  COMMONO* 

COMMON  NVEPA<RIEINy*HRPSEC<MAXLlN*EPS<NQEAR< lOUT. IPRNTiLOADEO  — COMMONOO' 
DIMENSION  TSlNVmii  IVEPAOOOO)  COMMON  * 

DIMENSION  VMlN(2|<VMAX(2)iVlNT(2)*N0lM(IJ  COMMBNOr 

DIMENSION  QACCON(l51*AOCC0Ntl8)  C0MM0N08 

“DIMENSION  TVrCRL(16J ’ ' C8MMBN09 

COMMON  TOlNV  . COMMONIO 

COMMON  IVEPA<VMIN«VMAX#VINT«NDIM#DACCeNiA0CC0N4TVICRL  ' COMMONll 

COMMON  TiMEyNRUN/ IN0IC#NRCC<NFUEL# ICLBCK4 ICLOKOiTSiBS^BBHPiTORO  COMMONIS 

COMMON  SSTaRQiESDOT/PABC/PAON^PPOB/TABCiTAON  “COMMONia- 

common  T9lCiT9lN#T8DNjT9OC/T90N  . _ COMMONl* 

“COMMON  T9liiT9IlQRiWB5<  WOAi  VVODi  AVlOiAVlS^TVIMJjVVDF^VVDMl/PAOPUCOMMONtO 
COMMON  FUELE/ITICYCiICLOKi/ISHIFTiWHLSLP^WHLOLO  COMMON!* 

“COMMON  ICYEND/NLINE# ICYCLEiNQIiNQIOLDi VEPA4 VANALG/PAOFRO* VVOAO  “ ' COMMONIT- 
COMMON  VV0S0/0ELTA«DELT«ISEQ4lC0/ESD0T04lQEAR  COMMONl* 

EQUIVALENCE  (DIST, VVOD ) i (8S* VV IBBR ) , , . . C0MM6N19 

DIMENSION  FTIME(6O)4ESPEED16O),AT0ROS(6O)#VAR(lO)|X(22S|4NVOLTn6ICOMMON20 

“DIMENSION  VAL(2)<NLT(2)4N0TC2>71PDX{20#a0)iISPEED(20)4TIMMAX(OT C0MM0N21 

DIMENSION  TIMLEN(5)<TIMAV3(9)  C0MM0N22 

COMMON  V*RjX4NVeLT4VAL4NLT/NGTiIPDX4lSPEED4TIMMAXiTIMLENiTIMAyG  C0MM0N23' 

equivalence  (FTIME(1)4X(*6) )« (ESPEE0(1)<X(106))4 iAT0RQ6ll)iX(166> )CBMMBN2* 
“COMMON" IOlDI/ I0LD2i IOL03i ISWli ISW2/ ISW3# lENQNO, lENGIN  C0MM0N25 

COMMON  ElNTRQ4FINTR04RIF/BFlNRiDFDeT<QNU<PQNU<TR0I0LiT9IC04RiDF  C0MM0N2* 

DIMENSION  COMM(26l,CNQTRQ(20)/ENOFUL(20)<ENGVACt20)iENOSTTr*Or— 

DIMENSION  ENGSTP(20>*EFFTAa(9,9<9)4RAEFTBUl4ll) 

COMMON  C0MM4ENOTRQiENQFUL#ENQVAC#ENGSTT<EN8STP,EFFTAB 
DIMENSION  AdOliCIlO) 


“COMMON  AtC^FUIDLiVACIDL/NSPEEDiNVELiNTIMESiSPDlyCj VELINC4TIMINC 
COMMON  TPTORQ^RIEPlF/CVTTBQ/ISIMjTSNEWiBSNEw/TSICDNiTSICDO 

“COMMON  “RPiRPPiPOBHPiTCVTLOATCLULSiRPMlN/RPMAX/TTiTCiTP  - 

COMMON  RASCAL# ENTORO/FDRA04 EGA IN#EDRAGiRAEFTB4RATKlS/ DTP 
dimension  QRATIOdOI 
COMMON  GR*TIO#RmIN#RMAX# icluch#cvtscl 
COMMON  /KPASH/VCRUS#OUM(Br 


“C0MM0N27 

C0MM0N28 

C0MM0N29 

C0MM0N3Q 

C0MM0N31 

C0MM0N32 

Commons* 

C0MM0N3* 

COMMONSe 

COMMONS* 


10 


‘rrfiENQrN.a)3#i5#25 

continue 

DFSTOPfENGSTPIll 

IF(VV05  *QTt  VCRUS»Oil)  OFSTOP  • 2080.0 

IF(OF-DFSTOP)10#30#30 

IENQIn«2 

IStfl“.  01  ISW2  • •!  ““  “ 

FINTRQ»FSPEEO(ENQTRO#NSPEED#SPOINC#PA8N-800.0I 


[ 


• • • • • 

54|  RFlNR«l./RIEPtF 

55|  - RETURN"  “ “ 

561  • 

57l IS  "CONTINUE 

sat  IF<PABN/OF.,90)20/iO<10 

59,  JO  IEN0IN*3  ■ 

601  !3Wl  ■ !3WS  ■ «1 

~ ■■■  611  ' “■  ‘FlNTRO«OiO"  ■ " ■ “ 

6BI  RFINR-l.^RJF 

631  RETURN'; 

64(  • 

65j— - j5  CONTINUE"" 

66|  DFSTRT  • F8PEE0(ENQSTTiNVCLAVELlNC«VV0S) 

67t  ' IF(DFi.pF8TRT)20*20«30 

681  10  IEN3IN*4 

69}  ~I3Wini'T8w2  V-Q 

701  FlNTR-OPOtO, 

711  RFlNR.l.iRIF  - 

721  RETURN 

731  end 
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••••  CVT3NU  •••• 


u • 

21 

31  C — 
♦ ( C»- 
91 
61 

:i  - 

91 

lot  ~ 

lit 

121  “ 
131 

1*1  ■' 

.151 

16} 

171  . 

181 

19I 

201 

211 

221 

231 

2*1 

291 

261  ■ 
271 
281 
29) 

301  ■■ 

311 

32) 

331 
•341 
39 1 
361  ■ 
371 

38) 

39) 

’401 
411 
421 
431 
441 
4Bl  • 

"461  C-- 
47i  C— 
48|  C>- 
49)  C— 
901  • 
91)  • 
52T  C-- 
93)  C- 


SUBRBUTINt  CVTQNU 
9UBR9UT1UE  TB  CALCULATE  CVT  EFFICIENCY 

R.R.RAOTKE  1/28/76  . . — 

CBMMBN  Rl£/TMAX/VACMAX*VVlMl«VVlLFR*VVl2eR«YVIlCD«YVIM<VVIlRF  CBMMBNOl 

CBMMBN  VVIM0RjVVIDRR<AylB<AVlR«T8I16R*AVlM«yvlFUtl*YVlFUS  C6MMBN02 

CBMMBN  VVlgwB»VVISH<VVIAMX/VVIA8«VVIlCF<TVIJCTiTVlJTR*TVIJRA  CBMMBN03 

CBMMBN  TVIjTWiSCALEF«DELMlN/FUELWTiTlDLE/DT  . . CBMMBN04 

CBMMBN  NyERAiRIEINV^HRPSECfNAXLlNtERSiNOEARjIBuTi 1PRNT«LBADEQ  CBMMBN06 

"OIMENSIBN‘T8INV(ll)iIVEPAf3000|  : — — CBMMBN  6" 

OIMENSIBN  VMlN(2)/VMAX(2)/VlNT.(2l,N0lM(2)  C8MMBN07 

"OIMENSIBN  DACC8N115)/ADCCBN(1S)  'CBMMBN08- 

DIMENSiBt)  TVICRL(16)  C6MMBN09 

CBMMBN  T81NV  . CBMMBNIO' 

CBMMBN  iyEPAiVMIN«VMAX» VINT<N0IMjDACCBN«A0CC8NiTVICRL  CBMMBNU 

'CBMMBN 'TIME* NRUN,lN01C/NREC#NFUEL#ICLBCK»TCLBK0iTS«BS<9BHPjT8R0  CBMMBN12- 

CBMMBN  S8TBRQ*ESDBT#PABC*RABN<PP9B*TABC*TABN  CBMMBN13 

■ CBMMBN  T9IC*T9IN*T80N*T9BC*T9BN  ...  CBMMBN14 

CBMMBN  T9li,T9nQR*VVBS*VV6A*VYB0* AVIB1AVIS4TVIMJ<VVDF<VVDMI<RA8FRCBMMBNIB 
'CBMM9N'FUELE<ITICYC«ICL9kI<ISH1FT<WHL6LP<WHL8LD.  ..  ...  “ ’CBMMBNIB" 

CBMMBN  ICYEND<NLINE< ICYCLE<N3I<NGIBLD<VEPA<VANALG<PABFR0<VV6A0  C8MMBN17 

~CBHM6N'VVBS0< DELTA* DELT< ISEO* IG8<ES0BT0< IOEAR  CBMM8N18- 

EOUIVALENCE  (OI$T<yV60)< (BS<VVIBBR)  ...  . CBMMBN19 

DIMENSION  FTIME(60)<’E9PEED(60)<ATSRQS(60)<VBR(10)4X(22S)<NVBLT(1B)CBMMBNB0 
DIMENSION  vAL(2)<NlT(2)<NGT(2)<IPDX(20<20)<ISPCED(201<TIMHAX(9)  CBMMBN21 

DIMENSION  T1MLEN(5)<TIMAVQ(9)  . ' CBMMBN22' 

CBMMBN  VAR4X<NVOLT<VAL<NLT<NOT<IPDX<ISPEEO<TIMMAX4TIMLEN<TIMAVQ  CBMMBN23 

"EQOIVALXNCE  •(FTIME[1)4X(46))4  tESPEE0(l)<Xtl06)  IjtATOROSmiXtlAAtlCBMMBNeA- 
CBMMBN  10LDI<1BL02<1BL03<ISW1<1SW2<1SW3<IENON8<IENGIN  CBMMBN25 

COMMON  E1NTRQ<FINTR0< RIF<RFINR<OFDBT< GNU* FQNU<TR01PL<T9ICD<R<PF  C0MMBN26 

PIMEN818N  CBMMt26)<ENGTRQ(20)<ENGFUL(20)<ENOVACt20)<ENG8TTt20)  C8MMBN27 

OIMENSIBN  ENGSTP(20><EFFTAB(9<9<9)<RAEFTB(11<11)  CBMMBN28 

COMMON  C6MM4ENQTRO<ENQFUL<ENQVAC<ENQSTT<ENQ8TP<EFFTAB  CBMMBN29 

■OIMENSIBN  AUO)<CtlO) . . , — C6MMBN30- 

COMMON  A<C<FUI0L<VACIDL<NSPEE0<NVEL<NTIMES<8PDINC<VELINC<TIMINC  CBMMBN31 

•CBMMBN  TFT0RQ<RIEPIF<CVTTRO<ISIM<TSNEW<B3NEW<T9ICDN<T9IC06  C6MM8N92 

CBMMBN  RR<RPP<PB8HP<TCVTL8< TCLULS<RPMIN<RPMAX<TT<TC<TF  ■.  C8MHBN33 

CBMMBN  RASCAL<ENT8R0<FDRAQ<CaAIN<E0RAG,RAEFTB<RATKL6<0TF  C0MM8N34 

DIMENSION  QRATIBCIO)  CBMM6N35 

•■C6MM0N'GRATIB<RMIN<RMAX<iCLUCH<CVT8Cfc ' COMMOWA” 

CBMMOn  /Q8L0S3/TCLSS4TTR1N 
COMMON  /pUMPCQ/TLPUMP 
COMMON  /QEARAI/AICVT 
COHMON/CVTTORQ/CVTMUX 


"INPUT-VARIABLES 

IQEAR—GEar  car  is  IN.  ZERO  IF  NEUTRALi 

ICLUCH-tCLUTCH  indicator  0 IF  OPEN.  1 IF  CLOSED  SR  SLIPPING. 

t9in-«-«drive  shaft  speed 

T9IC  PRIVESHAFT  TBROUE 

RMIN  minimum  system  RATIO 

R— RATIO  OF  DRIVESHAFT  SPEED  TO  FLYWHEEL  SPEED 

THE  OUTPUTS  ARE 


E-10 


* # • • 

341  C---T  CVTTR9-.T8PQUE  AT  ORIVEShAFT  WHICH  wIUL  BE  TRANSMITTED  T0 
“ 55|  C--—  TCVTUS—^QUIPMENT  TORQUE  LOSS  IN  CVT  AT  FLYWHEEL 

861  C-— • TCUULS  T9RQUE  LOSS  IN  CLUTCH  AT  FuYwHEEL 

57j  CSW--  QNO-— -CVT  EFFICIENCY ' “ 

58;  *-— ? CVTLS»«»T0R0UE  LOSS  IN  CvT 
59l  • 

60i  IF  (IQEaR)  60460<3 

’ ■ 611  "3  CONTINUE  ' “ ' 

6EI  IF(ICIUCH)  40«40<5 

63)  8 IF(R-RMIN)90/50#10 - - ^ 

64t  10  continue 

6BrC*»4«  clutch  CLOSED/  NOT  SLIPRINQ  “ 

661  CVTTRQ«T»IC 

67;  TCLULS»0*0.  . 

68)  IFTCVTTRfl  * CVTMAX  4 O.OJ  CVTTRQ  • -CVTMAX 

49J 30^0-20 — 

701  • 

711  “'  90  continue  ■■  ■ 

72l  C*— • clutch  SLIPPINQ 

• 731  CVTTRQfTJlC  " “■  ‘ ' ■ 

74|  TCLULS«(RH1N»R)«CVTTR0 

~ 7S  r aO'irONTTNUE ■■■■  

76|  SPOINpTSIn 

771  TC6CVTTRQ*CVTSCL  “ ... 

78;  CALL  M8NKEY(TC#SP0IN/RP/RRMIN/RPHAX«EFFTA»<CVTLS) 

79;  SPQHPp(T9In/RP)*A1CVT  “ 

80;  CALL  CQPUMP(SPUMP/TLPUMP) 

811  TLPOMP»TLPUMP*RPP«AlCVT 

82;  CVTl8«CVTLS/CVTSCL 

83;  TCVTLS'Ci/TLS*RPP  . ' 

84;  TTRIN»T9IC4RP*CVTLS 

83;  TEMP  P AB$(T9IC*RP) 

86;  ONU»TEMP/<tEMP*CVTLSJ 

87 1 RETURN — ^ ’ ' 

88;  • 

891  60  continue  . 

901  C—pp  QEAR  box  In  neutral 
■■  9i;  CVTLBpOtO 

98;  40  continue 

93;  Cp-p*  clutch  n3T“EN0AGED : 

941  CVTTRQ  P QNU  ■ TCLULB  p TCVTLS  f TLPUMP  • TTRIn  p 0*0 

95;  RETURN  ■ 

$6:  END 


DAT 

flywheel 
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••••  DST6RQ  •••• 


u 

3) 

it 


41  C»»* 
5) 


61 

7t 

8^ 

91 

lOi  ' 
ii; 
12J 
131 
141 
161 
161 
171 
181 
19( 
201 
3i: 
22  f 
23J 
24i 
25) 
261 
271 
281 
29: 
301 
31t 
321 
33: 
34: 
35: 
361 
37: 
381 
391 
40} 
411 
421 
43) 
661 
661 
461 
671 
681 


SUBRBUTINE  DST8R0 

SUBROUTINE  T8  CALCULATE  OBIVESHAFT  TBROUE  And  NEXT  THROTTLE  AND  BRAKE 
R.R.RADTI^E  1/28/75  - — ' 

COMMON  R1EjTMAX,VACMAXi VVlMljVVlLFR#VVl2eR/VVIlCDj VVIMiVVIlRF 
COMMON  VVIMDRjVVI0RR/AV1B*AV1R#T8116R<AVIM#yvIFUMiVVIFU6 
COMMON  vyi8WB*VVISH*VVIAMX<VVIA6»VVIlCF<TVIJCTjTVlJTR»TVlJRA 
COMMON  TyijTW«SCALEFiOELMlN/FUELWTiTIOLE/OT 

common  NyEPA<RlEINV#HRPSEC<MAXLlNjEP6*NGEAR, lOUT* IPRNT/LOAOEQ 

‘DIMENSION  T8INV(ll)<iyEPAOOOQ)  

DIMENSION  VM1N(2)< VMAX(2»/VINT(2)*NDIM(2) 

DIMENSION  DACCeN{15J*ADCCBN(16) 

DIMENSION  TVICRL(16) 

COMMON  T81NV  . , . 

COMMON  IVEPA/VMIN|VMAX#ViNT/NDIM«DACCBNjA0CC0N4TVICRL 
COMMON  T2ME:jNRUN4lNDIC<NReCANFUEL«lCUBCK«tCLBK0<TS»BS4aaHP«T0RQ 
COMMON  SSTeRQ*ESDBT#PADCjRAON4PPOB»TAOCiTAON 
COMMOiy  T9lC/T9IN4T80NiT90C4T9BN  . , . 

COMMON  T9Il;T9IlQR/VVe6<VV8A/VV00/AVl0iAVlS4TyiMJ*VV0F«VVDMI«PA8FRC0MM0N15 
COMMON  FUELE/ ITICYCj ICLBK14ISHIFT4WHLSLPaWHL0LD  " 'COMMONia 

COMMON  ICYEND4NLINE4 ICYCLtiNGIiNGIOLDiyEPAiVANALQiPABFROi VVOAO  CBMM0N17 

“C0MM0N'VVBS0/0ELTA4DELT4lSE04lQ64ESD0T0jr8EAR  COMMOmS 

EQUIVALENCE  (01ST/VV00)j  (BS/WIBBR)  . ..  . C8MM0N19 


COMMBNOl 

C8MM8N02 

C8MM0N03 

CBMMON04 

C8MM0N09 

CBMM8N-6' 

C8MM8N07 

C8MM8N08- 

C8MM8N09 

C8MM8N10" 

CBMM8N11 

C8MMBN12- 

C8MM0N13 

C8MM8N1# ■ 


DIMENSION  FTIME(60)4ESPEED(60)4ATeBQ6(60)/V6R(10l4y(225)<NVOLT(taiCOMMON20 
DIMENSION  vAL(2)/NLT(2)4NQTt2)iIPDX(20420)AlSPEED(20l«TIMMAX(B)  CBMM0N21 
DIMENSION  TIMLEN(3)4TIMAVa(5)  --C8MM0N82 

COMMON  VAR,X4NVOLTiVAL4NLT4NOT/IPDy4l8PEEDATlMNA^(4TlMLEN4TIMAyQ  C8MM8N23 

"EQUIVALENCE  (FTIMEU )4X(46) )4 (ESPEEO t 1J« Xtl06 ))4 ( AT8RQS} 1 )4XTt66rrC8HM8N*4 
COMMON  lBL0lAl0L024ieLD3jISMl4lSN24lSW34lCNaN0, IEN6IN  C0MMBN29 

COMMON  EJNTRO<FINTR04RIF4RF1NR4DF08T«ONU4FQNU#TR0IPLiT9ICD4R<0F  C8MMBN26 
DIMENSION  C8MM(26>4ENQTRQ(2D)4ENGFUL(20)iENQVAC(20)AEN08TT(20) 

DIMENSION  ENGSTP(20)<EFFTAB(94949)4RAEFT9(ll4ll) 

COMMON  COMMiENOTROiENaFUL^ENGVAC/ENQSTT/ENQSTP/EFFTAB 

■DIMENSION"A(10)4C(101  "■  . — 

COMMON  AiC/ FUIOL< VAC IOL/N8PEED4NVEL4NTIMES4SPOINC4VELINC4 TIMING 
COMMON  TFTBRQ4RIEPIF/CVTT80A18IM4TSNEW4BSNEW4T9ICDN4T9ICD8 
common  RF4RPP4F0BHP4TCVTLS4TCLUL64RPM1N4RPMAX#TT4TC<TF 
COMMON  RASCAL/ENTORO/FDRAa^EGAlN/EDRAOiRAEFTBiRATKLBiDTF 

dimension  QRATIOdOl 

-C0MM0N~aR4Tie4RMIN4-RMAX4rCLUCH4CVT8CL-’ 


CBMM0N27 

CBMM0N28 

C8MM0N29 

COMMONS 0“ 

CBMM8N31 

C0MM0NS2 

C0MM0N33 

CBMMBN34 

C0MMBN3B 

COMMONS  6- 


C»f  •• 


SET  ACTUAL  DRIVESHAFTTOROUE 
T91C»T9IC0N 

calculate  brake  setting 

93  • 0«0 

TF(T9ICDN‘.LE.  OtOl'BS  » tT9ICDN/VVI2BR 


49:  c»«*« 
901 


511  C*- 
92: 

53: 

541 

••51  - 


IFUGEAR  0 0 < ICLUCH)  RETURN 
CAR  IN  neutral  or  clutch  OPEN. 

IF(BS  > 0.2)  RETURN 

EXCESS  BRAKING  NOT  REQUIRED*  VEHICLE  COASTS. 
CALL  NUTRAL(T90N4l.0.RP.TNUM-)  ■ " 

T9IC  • TNUM 
RETURN  , 

END  ■ 


■] 
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I 

1 


• f 

11 

21 

31 

■*1 

51 

61 

71 

81 

31 

iOt 

lit 

izt 
131 
161 
181 
16J 
171 
18] 
IJi 
201 
811 
221 
231 
261 
2Sl 
261 
271 
28! 
29| 
301 
311 
321 
331 
361 
351 
361 
371 
381 
391 
601 
61] 
62 1 
63i 
661 
66] 
66  f 
67| 
681 
691 
501 
511 
521 
Ml 
561 
551 


• ••••  ENQlNI 
SUBROUTINE  ENGINI 

C....  SUBROUTINE  USED  FOR  INITUUIZING  ENGINE 

"C.rt.  R.R.RADTKE  r/29/75 — ' ^ — 

♦ MODIFIED  ON  16  OCT  1976 

COMMON  RIE<TMAX<VACMAX< VViMljVViLFRj VVI28R/yy I iCD<VViM«VVliRF 
COMMON  VVIMDR<VVI0RR<AVIB<AVIRJT8I18R<AVIM<YV1FUB4VV1FUS 
COMMON  VVISWBj VVI3H<VVIAMX<VVIAS<VVI 1CF<TVIJCT<TVIJTH<TVIJRA 

COMM0N'TVIJTW<SCAUEF<0ELMINaFUELWT<TTDLE<DT  --- 

COMMON  NVEPA<R1EINV<HRPSEC<MAXL1N<EPS<NQEAR< IOUTjIPRNTjLOADEO 
' ‘ DIMENSION  T8INV(11)<1VEPA{300D) 

DIMENSION  VMlN(2)<VMAX(2)<VlNT(2)<NDtM(2) 

DIMENSION  DACC0N(15)<ADCC0NtlB) 
dimension  TVICRL(16) 

COMM9N"T0lNV  ’ ' “ ' “ 

COMMON  IVEPA< VMINjVMAXjV i NT<NOIM<OACCON< AOCCONjTviCRL 


COMMONOl 
C0MM0N02 
C0MM0N03 
-C0MM0N06- 
C0MMBN05 
-COMMON  6 
C0MM0N07 
C0MM0N08- 
COMMON09 
-COMMONlCr 

COMMONll 

C0MM0N12 

C0MM0N13 

C0MM0N16- 


-COMMON  TIME<NRUN< InDIC<NREC/NFUEL< ICLOCKj ICLOX0<TS<BS<0BHP<T0RQ 
COMMON  SST0RQ<ESOOT4 PA0C<PAON<PPO8<T6OC<TAON 
COMMON  T9lC<T91N<T80N<T9eC<T90N 

common  T9I 1< T9IlGR<VVaS/ VVOA<WOD<AVI0<AV lS<TVIMj<VVPF<VVDMl<PAOFRCOMMONlS 

“COMMON ‘■FUELE<ITICYC<ICLOKt<ISHlFT<WHLSLP<WHLOLO.  COMMQNIO 

COMMON  ICYEND<NLINE< ICYClE* NQI <NQI 0L0< VEPAj VANALGj PAOFROj VVO AO  COMMON17 

COMMON  VVOSO<DELTA<DELT<1SEO<IQO<ESOOTO<IOEAR  C0MM0N18 

EQUIVALENCE  (0  IST<  WOO ) * ( BS/W IBBR  ) C0MM0N19 

DIMENSION  FTIMEl60l<S8PEED(60)<AT3BOS(601<V6RtlO)<Xt225)<NVOLTUBlCOMMON20 
dimension  VAL(a)<NLT(2)<N3T<2)<lP0XI20<20)AlSPEED(20)<TlMMAX(S)  C0MMeN21 

“DIMENSION 'T'lMLENtSljTIMAVQfSl  - - * tOMMONBr- 

COMMON  VAB<X<NVOLT<VAL<NLT<NQT<IPDX< 1SPEED<TIMMAX<TIMLEN<TIMAVQ  C0MMDN23 

“EQUIVALENCE  (FTIME ( 1 )< X 166) >< (ESPEED(l)<X(106) )< (AT0ROSll)<X(166nCeMMON26 
COMMON  1OLQ1<IOLO2<16LO3<ISW1<ISW2<ISW3<IENQN0<IENQIN  C0MM0N23 

■ COMMON  ElNTRQ<FlNTRO<RIF<RFlNR<DFDOT<QNU#FaNU<TROIOL<T9ICD<R<DP  C0MM0N26 

DIMENSION  ceMM(26)<ENQTRQ(20)<ENGFULI20)<EN0VAC1201<ENQSTT(a0)  C0MM0N27 

“DIMENSION  ENGSTP(20)<EfFTAB(9<9<9)<RAEFTB(ll<ll)  -C0MM0N38- 

COMMON  COMM<ENQTRO<ENQFUL<ENQVAC<ENQSTT<ENQSTP<EFFTAB  C0MM0N29 

dimension  A(10)<C(10)  ...  COMMON30 

COMMON  AiC< FU IOL< VAClDLi N3PEE0<NVEL< NT i MES<SPDINC<VELINC<TIMINC1  C0MM0N31 
COMMON  TFT0RQ<RIEPIF<CVTTRQ* IS1M<TSNEW<BSNEW<T9ICQN<T9ICD0  C0MM0N32 

common  RP<RPP<FBBHP<TCVTLS<TCLULS<RPMIN<RPMAX<TT<TC<TF  COMMON33 

“COMMON  RASCAL<ENTOR9<FORAa<E8A!N<EORA8<RAEFT0<RATKL8<OTF  COMMON36- 


OIMENSION  QRATIO(IO) 

COMMON  QRAT10<RMIN<RMAX< 1CLUCH<CVTSCL 


0BHPiiPA0N*TRQIDL/52B2. 

fintrq*trqiol 

PAOFRWFuIOL 

• special 

PPOB  r OlO 
•••  PPOB  • VACIOL 

1SW1*0 

1SW2P1 

PAOC  ■ SSTORQ  p 0.0 


CBMM0N35 

C0MM0N36 


returns 

END  ■“ 
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••  • # 

II 

2) 

3l 

--'M 

B| 

*1 

81 
9| 

■ tor 
nt 
"181 
131 
141 
161 
16  r 

17J 

18i 

19t 

20J 

211 

"281 

331 

241 

251 

361 

271 

"381 

29} 

301 

311 

321 

33! 

“341 

391 

361 

371 

381 

39J 

“401 

411 

481 

431 

441 

491 

“461 

471 

481 

491 

901 

511 

631 

531 


• • 

• 

C-- 

Ci-i 


••••  ENQWHL 

SU9RSUTISIE  ENQWHL 

SUBROUTINE  TO  InTESRATE  FLYWHEEL  SPEED  AND  ENGINE  SPEED 

RiRtRADTKE  3/19/75 . . : ' . ~ 

COHMON  Rle/TMAXiVACMAXiVVlMljVVlLFRiVVI36R/VVllCD»yyiM«VVIlRF  COMMBNOl 

COMMON  VVIMDRiVVI0RRiAVlB«AVIR«T8110R/AVIM*yviFUM«yVUFU6  . COMMONOr" 

COMMON  vyiSW0#VVISH»VVIAMX#VVlAS«VVUCFiTVIJCTjTVIJTR«TVIJRA  C0MM0N03 

"COMMON  TVIJTW/SCALEf^iOELMlN/FUELWTiTIDLE^OT  , — -C0MMON04 

COMMON  NVEPA/R!ElNV«HRPSEC«MAXLINiEPS/NQEAR« 10UT< IPRNTiLOADEQ  C0MMDN06 

■T5IMENS:0N"I8INV(ll)iIVEPA(3000)  COMMON  6“ 

DIMENSION  VMlN(3)jVMAX(3)iVlNT(2),NDlM(2)  C0MM0N07 

'DIMENSION  DACCBN(15J/ADCC0NU9)  ‘ " " ' ' C0MM0N08  “ 

DIMENSION  TVICRLI14J  C0MMON09 

■'COMMON  T8INV  COMMONXO" 

COMMON  iyEPA/VMlNjVMAXiVINT/NDIMiDACC0NiA0CC0N4TVICRL  COMMONll 

~C0MMBN'‘TlME4NRUNjINDIC4NR|CiNFUEL4lCt0CK«lCL0K04TS4BS»a8HP«T0Ra— COMMBNtZ- 
COMMON  SSTORDiESOOTiPABC^RAONiPPOB/TAOCiTAON  C0MMBN13 

"■COMMON'T9lC/T9IN4T80N4T9eC4T90N  . , _ . COMMONl#"- 

COMMOn  T9ll4T9IlGR/VV05*VV6A«VVBD4AV|04AVl6|TyiMj4VVDF4VVDMl4PAtFRCOMM0Nl6 

"COMMON  FUELE4lTICYC4lCL8ia4lSHIFT4WHLSLP«WHL0L0.  . COMMONlft- 

COMMON  1CYEND«NLINE4 ICYCLE4NQI4NQI0LD4VEPA4VANALG4PA0FR04 VVOAO  CBMM0N17 

-COMMOM  VVOSO/DELTA4DELT4t8EQ4l0O/E8DOTO«t«eAR -COMMONil- 

COUIVALENCE  (OISTiVVOD)!  (BS<VVI5BR)  . , . - C0MM0N19 

DIMENSION  FTIME(60j4esPEEO(60)#ATOROSUO)#VARUOJ4  8l228l4NVOLTIlBICOMMON3(J- 
OIMENSION  VAL(2)^NLT(3)4NaT(2)iIPDX(30420)MSPCED(30)4TIMMAX(6)  C0MM0B31 

"DIMENSION  TIMLEN(5)4TIMAVQ(9>  “ C0MM0N38 

COMMON  VAR,X4NV0LT4 VALiNLT^NQTi IPDX/ I6PEE04TIMMAX«T1MLEN4TIMAVQ  C0MM0N33 

■"EQUIVALENCE  fFTIMEd  J4"Xf46)  T4  (ESPEE0tl)AXIl06n4  lATORQSniiX-MOSnCOMMBNSO- 
COMMON  lOLDl/IOLP2AieL034l8Wl4lSW34lSW3|IENGN04lEN6lN  C0MM0N38 

■ COMMON  eintrqaFintro4Rif4RfinR40fdot/gnu4PQnu«troipi.aT9ico4R*DF  commons* 

DIMENSION  CBMM(8*)4EN3TRQ(30)4ENQFUL<20l*ENeVAC,(20|iENQ6TT(30) 
dimension  ENQSTP(30)jEFFTAB(949a9»4RAEFTB(11411) 

COMMON  COMM4EN0TRO,ENQFULaENOVAC*ENGSTT4ENOSTPjEFFTAB 

“DIMENSION  A(10l4C(lOr7 

COMMON  A*C4FUIDL4VAC10L/NSPEEDjNVEL4NTIMES4SPDINC4VELINC4TIM1NC 
COMMON  TFT0RQ«RIEPIF/CVTT«QaISIM4TSNEW4BSNEW4T9ICDN#T91CD0 
COMMON  RP4RPP4FoaHP4TCyTL84TCLULS4RPMlNiRPMAX4TTATCiTF  ^ 

COMMON  RASCAL/ ENTeRQ4FDRA34EQAIN4E0RAa4RACFTB4RATKL640TF 
DIMENSION  aRATieuOl 

COMMON  QRATI0/RMlN4RMAX/1CUiCH/CVTSCt  ' “ 

DIMENSION  CC(10>4AA(10) 

COMMON  /SuMVAR/CC/AA 
common  /FLYEPF/PERLOS 
COMMON  /QRLOSS/TCLSSiTTRiN 
COMMON  /PUMPCQ/TLPUMP 

"COMMON'/ENQW/FNOT/NOT"'  — 

COMMON/HOTEL/THOTEL 


COMMONS? 

COMMONS! 

C0MM0N29 

C0MM0N3O- 

C0MM0N31 

COMMON38 

C0MM0N33 

C0MM0N3A 

C0MM0N36 

COMMONS! 


• 

• T9IN  IS  THE  SHAFT  VELOCITY  AFTER  THE  CVT 

t 

1000  F0RMAT(/19H«»INPUT"T0  ENQWHL**/ SX/ 5HTIME»/F. 2 ) 

1010  FORMAT (6X/AH1Sw1/6X/4H1Sw3/5X/6hF I NTRQ/9X/!hTCVTLS/5X/!HTCLULS/ 
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i«  • t t * 

541  1 6X<5hTCISS<6X/5HRFINR/7X«4HSUM1<7X<4HSUM8«5X<6HCVTTR0) 

55j  1020  FeRMAT(8(7Xj I3)«8E11,3) 

I Sit  1030  F6RMATI5Xi6HENTeRa/BX<6HTFTeRQ>9X«iHRGNTROi6X<5HeSOBT«iX/SHOroeT> 

' ■ S7r 1 7X/»HFaON«9X*2HOF7— — 

' 581  1040  FeRMAT(75ll.3) 

I 591  lOSO  F8RMATC/) 

! 601  • ... 

“ill  A(l)iA(i)»A(8)fA(9)»A(10>*AA(l)iAA(2)»AA(i)«OFlNT»0tO  

62t  EQ!5  • (•ISi42)*EGAIN 

'“63J~ SUM!' . TCVTLS  4 “TCL0Ur“»~nn.8S  4 TUPOMP  ♦ ThOTEL  

641  suri2  ■ F1nT)^Q  * SUMl 

65;  P|Rl  « PERL8S  • 1.0 ' 

661  • 

i7(  — IFISENSE  switch  21100/110  ■ •-  -- 

68|  100  continue 

““69;  PRINT"  1000/TIHE  

70;  PRINT  1010  

71;  PRINT'  1080/I8Wl/I8w8iriNTRQ/TCVTLS/TCLUUSATCLSS/RFINR/SUMl/SUM|/ 

72;  1 CVTTRQ 

731  "“PRINT  "1030“  ■ “ ■ 

74|  110  continue 

■“~75l"*  — ~ 

761  08  50  1 • 1/FNOT 

77;  ENT8R0  ■ E81S«{DF»PABN)  

78;  TFT8RQ  • SUM2  • R»CWTTRO  t EnT8RQ« ( • ISwl ) 

79;  • “ ■ “■  

BOt  • IF  TFT8RQ  4 0/  THEN 

"“srr^ 

82;  TFT8R0  « »TFT8RQ/PER1 

. FLVQRL  • .TFT8RB«PER18S 

84;  • 

85;  # ■ BTHERtfIBE/  FBR  POSITIVE  TFT8R0 
861  4 

~87; rrrTrT8R0““. SET  O.0rTFT8Rr“»  TrT8R9*PERl*PtRll  FEYORL  » "FLYORU»PCtt 

88;  • 

■ 891  DFD8TiTFTBRQ4RFlNR-DF»F0R«a 

90;  0P*0F*DFD8T«DTF 

■ 911  --R  • T9IN^DF 

921  IF(IENGIN.2)aO/aO/20 

“931  • " 

94j  20  E8DBT.CNTaR0»RIEINV«EDRAQ4PABN 

95;  "“  PAeN»PA8N*ESD0T»DTF 

9il  IFIIENQIN  .EO.  4)  PABN  • 0.0 

97;  IF<PA8N)2B/40/40 

98;  25  PA0N«O.O 

~991  -Q8  T8  40 ' 

1001  30  continue 

loll  ‘ PA8N-PF  “■  “"  ■ 

_l02t  ESDBT»DFD8T 

103;  40  continue  ' 

1041  A(1)»A(1)4PABN 

~I05t  A(6>»A(6)T(TFTeR0.FINTRQ|4DF"  ““ 

1061  A(8)»A(8l4ENT0RQ40F 
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**•!** 

107J  A(9)iA(9>+DF«DF 

10B|  AaO)i«(tO)«DF*FlYQRL 

1091  OFINT  • OFINT  ♦ OF 

not IF(SeNSE~8WITCH  21^200*210- ■ 

lilt  200  CONTINUE 

1121  • 

1131  • rqntrq  value  is  from  the  previous  dt  interval 

■■  ■ llAl  • " 

list  PRINT  10fcO*ENTORQ*TFTORQ#BaNTRQ<E8DOTiDFDOT*PAeN*DF 

~ 116;'  210  CONTINUE 

llTj  80  CONTINUE 
list  • ■-  

1 1191  RQNTRQ  • (R*CVTTRO  ♦ SUM1)«PER1 

- - jggj  IF(RQnTRQ  « 0«0J  BONTRO  • 0*0 

121t  1F(SENSE  SWITCH  at  300*310 

1221  300  CONTINUE  “ ' - 

1231  PRINT  lOSO 

1241  ‘ 310  CONTINUE'  - - - 

1231  • 

1261  BFF-'i  OFlNT/FNDT 

1271  • ADD  9ACK  into  FINTRO  THE  ACCESSORY  LOAD!  SEE  SUBROUTINE  ACCESS 

I26l~  A(rr»"Ari)4l.08»F|NTRO/FNOT — — 

1291  • 

1301  A(3)  V DFP»TCVTLS  ' - “ ’ 

1311  A(*>  f OFF*iTCLUL« 


1321 

A(6)  j A(6)/FNDT  ■ 

1331 

A(6)  4 A(8)4(.ISW1)/FN0T 

1341 

A(9)  • A(9)4F0RAG7lRnNR»FNDT1 

last 

A(10)  * A(10)/FnDT 

1361  ^ 

AA(l)  f OFF*TCLSS  ‘ 

137l 

AA<2)  V DFF«TLPUMP 

1301 

AA(6I  • 0FF*RQNTR8 

139i 

RETURN 

-'1401 

KNO 
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• • t * * 

It  • . •••*  EP^CAUC  *••• 

81  - SUBRBUTTNE  EPACALC(RVEL*TUTIME) 

3t  * 

♦!  *“'17  N9V  1976 

St  C8MMBN  RiE*TMAX#VACMAX<VVlMl4VVILFR<VViaBRi¥VliCD/VVIM«VVliRF  C9MM8N01 

61  C8MM8N  VSflMDR*VVIORR«AVIB/AVIR«T8I10R,AVIMiYVIFUBiVVIFUS  - CBMMSNOe  

7|  CBMMBN  vyiSWB#VVISH<VVlAMX*VVUS<VVUCF<TVIJCT«TVIJTRATVIJRA  CBMM8N03 

8|  CBMMBN  TV1JTW,SCALEF/OELMIN<FUEUWTiTTDLE#OT  CBMMBNOA — 

9|  CBMMBN  NYEPA/RlEINV/HRPSEC/MAXUlNiEPS/NQEAR* tBUT<iPRNT/LBAOEQ  CBMMflNOB 

lOl  OIHENSIBN“T8INV(UI>TVEPAr30OO) tBMM8N-6 

lit  OlMENSIBN  VMlN(2)*VhAX(2)iVlNT(2)«N0:M(2)  CBMM9N07 

12|'  OlMENSIBN  DACCBN(15)/A0CC8N<IB)  ' - CBMMBN08 

131  OlMENSIBN  TVICRL(16>  CBMMBN09 

■ “ l*t  "■  CBMMBN  T8INV  'CBMMBNIO  

18|  CBMMBN  I¥EPA<VMIN#VMAX<VINT/NDIMiDACC6NiADCCBN,TviCRL  C9MMBN11 

16|  CBMMBN  TlME,NRUN<lNDICjNRSC*NFUELiICLBCK<ICLBK0iTSiBS<8BHP,T8RQ  — C8MMBN12 ^ 

17|  CBMMBN  SST9RQj£SDBTiPAaC«RABN<PPBBATAflC#TA9N  CBMM6N13 

- 181  CBMMBN  T9IC#T9IN/T8DN#T96C/T9BN  . , C8MMBN1* 

19 1 CBMMBN  T9I1*T9I1GRj  VVa6/VV6A«W8D#  AVl8«AVlS4TVlMJiVV0F«VVDMl<PA9MCflMM9N16 

201  CBMM6N~FUELE/ITICYC<ICLBKl»ISHIFT4WHLSLPiWHLBLD  " C9MM9N16 -= 

211  CBMMBN  iCYENO/NUlNEi ICVCCEiNGliNGIBUOi VEPA/VANALQjPABFROi VVBAO  CBMMBN17 

22) CBMMBN 'VyBSOiOEUTA^DELTirSEQilGB/ESDBTOjiaeAR  ’ “ - - " — CBMMBNte 

23)  OlMENSIBN  FTIME(60)jESPEED(60)#AT6ROS(60)»VAR(iO)4X(225j4NV8LT)lB)CBMMBN20 

- 261  ' OlMENSIBN  vAL(2)#NuT(2)iNaT(2>*IPDXtt0420)iISPEEOt20)<TlMMAX(S)  ' CBMM8N21 

261  dimension  TIMLEN15)«T|MAVQ(6)  , . C8MM8N22 

26)'““  COMMON  V*R#X4NV8LT,yAL4NUT#NQT#IPDX4lSPEE0«TIMMAX|TIMLEN4llMAVQ  C8MMBN23 

27|  EQUIVALENCE  (FTIME(1)4X(A6) )# (E8PEE0 ( 1 1 / XI 106 n, ( AT8RQ6( 1 )* X ( 166) 1C8MMBN2A 

28) COMMONTTBLDI*  1BL02#  I8L03i  ISWI4  ISW2/  ISwSj  ICNGNB,  lEtJQlN  C8MMBN2B 

291  COMMON  ElNTRQ»FlNTR04R]F,RFlNRiDFD8T<QNU<FGNU«TROI0L<T9ICD|R40F  CBMMBN26 

30)  DIMENSION  C0MM(26)/CNGTRQ(2O)4ENQFULt2O)*ENgvACt2O)AENQSTT(2O)  C8MMBN27  - 

31)  DIMENSION  ENQSTP(20)iEFFTAB(949/9)»RAEFTB(ll4ll)  CBMMaN28 

321  — COMMON  CBMMiENGTRQ^ENGFULAENGVACiENQSTT/ENQSTP^EFFTAB  CBMM8N29  ■ - 

33l  DIMENSION  AtlOiCdO)  . - C8MMaN30 

361 C6MM8N-AiC/FUIDL/VACtDLiN8PEED|NVEL#NTIME8>SP01NC/YELlNC»TTMINC COMMON^l 

35|  COMMON  /EPASM/  VCRUS/ACEL<DECELaTAaTCjT0<DUM(2)jRTLN0T 


■ 36)  C ‘ .. 

37|  C»***  RETURNS  THE  VELOCITY  THE  VEHICLE  MUST  REACH  IN  T+1  SEC.  s 

381  C»«*»  INPUT  From  ROEPA  in  COMMON  IS  VCRUS.CRUISINQ  SPEED 
391  C**»»  ACEL'ACCElERATION 

601 "C****  DECEL-OECELERATION — - — 

411  c***«  TA.TIME  The  acceleration  cycle  ENOS 
621  c»*»*  tc»time  The  cruisino  cycle  ends 

63)  C*»**  TO  time  The  DECELERATION  CYCLE  ENOS 
66|  * TlOLE.TlME  AT  BUS  STOP 

68)  ♦ te*time  For  one  cycle  »to  ♦ tidle 

66T  « TUTTME"!'  PTIME  • TU'FROM-'tDEPA — ' - 

67i  • 

“68)  • acceleration  PHASE 

69)  IFITUTImE  « TA)  RVEL  • RVEL  ♦ ACELiNVEL  » RvEL.lO.OiRETURN 
“■  501  • CRUISE  phase 

511  IFtTUTiME  < TO  RVEL  • VCRUSjNVEL  * RVEL*10.0JRETURN 

■ 52)  »"“BUS  STBP  PHASE'"'  ' 

53 1 1F(TUT1ME  ,GE.  TO)  NVEL  • RVEL  » O.ORETURN 

56)  # deceleration  PHASE 

561  RVEL"RVEL-0ECEL 

861  IF(RVEL  < 0.0)  NVEL  • RVEL  • O.OlRETURN 

57)  NVEL»RVEL»10.0 

68)  RETURN 

691  end 
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;i  • 

■ 21 
31  • 

■ 4 1 "(T 
5t 

6J  " 
7\ 

-81  - 

101 

u< 

121  ~ 
131 

_15| 

161 

in.._ 

i«> 

19) 

201 

211 

221 

231 

261 

251 

261  “ 
271 

281 

291 
301  - 
311 
321 
331 

3*1 

351 
36  r 
371 
381  • 


3UBR8UTlhJE  EPAVEL 

16  NOV  1976 


••••  EPAVEL 


COMMON  RlE«TMAX<VACMAX*VVlMl4VVlUFRiVVI20R»VVllCD»VVlM«VVIlRF 
COMMON  VMIMDR#VV10RR#AVI84AVIR«T8IiaR4AVlMiVVlFUt1«yVlFUS,  . 
COMMON  VVI8wB4VV1SH4VVIAMX4VVIA8iVV11CFjTVIjCT4TVIJTR«TV1JRA 
-COMMON  TyiJTW^SCALEF/OELMlN/FUEUWTiTIDUEjOT 
COMMON  NVEPAlRIClNVtMRPSECjHAXLlN^CPSfNaCARi lOUTj IPRNT^LOAOEQ 
■DIflENSieN“T8INV(ll)>'TVEPAl3000) 

DIMENSION  VMlN(2)4VHAX(2)«VlNT(2)4N01M(2) 

"DIMENSION  DACCONllSliADCCONllS) 

DIMENSION  TVICRUU6I 

"COMMON  TSINV  ■ ■ ... 

COMMON  I VEPA/ VMI NiVMAXiV INTEND IM.OACCONjADCCONiTVICRL 


COMMONOl 
C0MM0N02  - 
C0MM0N03 
COMMONS*  - 
C0MM0N05 
"C0MM01«~6“ 
C0MM0N07 
C0MM0N08- 
COMM0N09 
XOMMONIQ- 
COMMONll 

COMMOfrTlMEiNRUNilNDlC^NREONFUEL.ICLOCK^lCLOKO^TS/BS/OBHPiTOHO C0MM0N18- 

COMMON  SSTORQ<ESDeT4PAOCiFAON4PPee#T*OCjTA8N  C0MM0N13 

COMMON  T91C4T91N4T80N4T90C»T90N  ....  COMMONl*  " 

COMMON  T9ll4T9IlQR/VV08<VVOA4VVOD/AVIO«AVlS4TVlMJ»VVDF4VVOMl4PA8fRCOMMON15 

COMMON  FUELEilTICYCilCLOKlilSHlFTiWHLSLP^WHtOLD.  COMMONI6  ' 

common  iCYEND/NLlNEi ICYCIEj NSI j NGIOLD4 VEPA4 VANALQ* PAOFRO* VVOAO  C0MM0N17 

C8MM0^^vy8S0#DECTA4DEl:T^  ISEOilGO^ESDOTOilOEAR  _7; “■  C0MMON18- 

OlMENSION  FTIME(60l4ESPEED(60l4AT0RQS(t0)4VAR(10)iX(2251«NV6LTiie)C0MM0N2Q 
DIMENSION  VAL(2)iNUT(2)4NQTt2)«IP0X(20420)iISPEED(20l4TIMMAX(81-  C0MM0N21- 
DIMENSION  TIMLEN(5)4TIMAVS(5)  C8MM0N22 

COMMON  V*R#XjNV0UT«VAL4NuT/NaT4lPDXj ISPEED/TlMMAX^TlMLENiTIMAYQ  C0MM0N23' 
EQUI valence  (FTIME(1>4X(*6))4 (ESPEE0(1)4X(106))4 (ATORQBI 1)4X1 166) IC0MM8N2* 

COMMONTTOLPI/  I0L024  tOLD34"ISWl4  ISW24  I8W34  lENQNOi  lENQIN  -C0MM0N29- 

COMMON  EINTRQ4FINTRO4RIF4RFINR4OFOOT4QNU4FQNU4TROIOL4T9ICD4R4OF  C0MM0N26 
DIMENSION  ceMM(26)iENQTRQI20)4ENGFUL(20)<ENBVAC120)4ENa8TT(20)  C8MM8N27- 

DIMENSION  ENGSTP(20)4EFFTAB(94949)4RAEFTeai4ll)  C8MM8N28 

COMMON  C0MM4ENGTR04EN0FUL4ENQVAC4ENQSTT4ENasTP4EFFTAB  C0MM0N29 

DIMENSION  *(10)4C(10)  . . . C0MM0N30 

COMMON-AiC/FUIOL4VACIDL4N8PEE04NVEL4NnMC84SPDl5JC4VCLlNC4TIMlNC C8MM8N31- 

COMMON  TFTORQ4RIEPlF4CVTTB04l8IM4TSNEWiBSNEW4T9tCQN4T9ICOe  C0MM0N32 

COMMON  RP4RPP4FBBHP4TCVTlS4TCLULS4RPMIN4RPMAX4TT4TC<TF  C0MMON33  - 

common  RA3C*L«ENTeR04FORAa4EQAIN4EORAQ4RAEFTB4RATKL64DTF  COMMONS* 


391 

I'TIME 

*0| 

n»T+i 

*11 

16 

continue 

■ “ 621 

DELT»FL0«TIII)»T1ME 

*31 

IF(DElT-OELMIN)  IS4IO4IO 

**1 

15 

11*11*1 

*51 

IF(I1  > NVEPA)  I64I64* 

*61 

6 

'CONTINUE 

*71 

1I»NVEPA 

*81 

ICYEND'l 

*9l 

10 

CONTINUE 

501 

KPLACE*Il/2 

Sll 

KREM»1I.2«kplACE 

931  IFIKREM  lEQ.  0)  VEPA  ■ 0. 1*10ATA2< RETURN 

6*1  • . 

SSI  lTEMPl»n<EPA(KPLACE*l) 

S6I  IDATA2  • lTEMPl/4096 

57l  •••  IDATAl  P IVEL  » ITEMPl  » IDATA2**096 
981  VEPA  •lllEMPl  • IDaTAI«*096J«0«1 

591  RETURN 

6OI  END  
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••••  QRSHFT  •••• 


• n • 

li  • 

81 

31  C 

^*1  C*» 
5| 

61 
71 
81 
91 

'101 
111 
181 
131 
HI 
15: 

161 
171 
181 
19| 

801 
811 
881 
831 
84} 

851 
861 
871 
88( 

891 

301 

311 

381 

331 

'341 

351 

361  “ 

371 
381 
391 

'401 

411 

481  — 

'^3l 
441 
461 

'461 

471  • 

481  C-- 
491  C-T- 


SUBReuHNE*  QRSHFT 

subroutine  to  shift  gears 
•••TOM  HAUSSnbaLER  9/1975' 

MOOI^ieO  ON  14  OCT  1976 

COMMON  RlEiTNAX/VACMAX,VVlMliVVltFR< VViBBR/yVlicOiVVlMiVVliRF 
COMMON  VyiMDR«VVlDRR<AVIB/AVIRiTeilOR/AVIM,VVlFUMlYVUFUS 
COMMON  VVISWB,VVISMiVVlAMX,VVlAS«VVllCEiTVIjCT,TVlJTR*TVIJRA 
'CBMMON'TVIJTW«SCALEF,DELMlN<FUELWT«TIDLE/Or  ' ^ . 

COMMON  NVEPAiRlEINV/HRPS£C#MAXLlN,EP6«NGEAR, 10UT< iPRNTiLOAOEQ 
DIMENSION  TSlNVanilVEPAOOOO) 

DIMENSION  VMIN(8)«VMAX(8)*VlNT(8)«N0lM(ai 
DIMENSION  DACCON(15)<ADCC0N(15) 

DIMENSION  TVICRL(IS) 

"COMMON  TIINV 


COMMONOl 

C0MM0N08 

C0MM0N03 

C0MMBNO4 ■ 

C0MM0N05 

COMMANDO 

C0MM8N07 

COMMONOO 

C0MM0N09 

COMMONJO' 

COMMONll 

C0MM0N12 

C0MM0NI3 

C0MM0N14 


COMMON. I VEPAiVMINiVMAX# VINT/ NDIM<OACCON#ADCCON4TVICRL 
COMMON  'TIME/ NRUNi I NDlC/NREC/NFuELi ICLOCK# tClBKO/TS/BS/OBHR/TORO 
COMMON  SSTORQ/ESDOT/PAOC/RAON/PPOB/TAOC/TAON 
COMMON' T9ICjT9IN/T8ON/T90C/T9ON  , 

COMMON  T9l;,T9IlQR,VVe5/VVOA/VY8D/AVIO|AVlS4TVIMJ/VVDF/VVOMl/PAOraCOMMON15 

-COMMON'FUELE/ ITICYCilCLOKliTSHIFT/WHUSUPiWHUOLO  COMMONtO 

COMMON  ICYEND/NLINEi ICYClE/ NQI / NQI OlDi VEPA/ VANALQ# PAOFRO/ VVOAQ  C0MM0N17 
COMMON 'VVOSO/DElTA/DELTilSEO/ieO/ESDOTO/IOEAR  - C0MM0N18 

EQUIVALENCE  ( D IST/ WOO ) # ( 8S/ VVIBBR ) ...  C0MM0N19 

DIMENSION  FTIME(6Ol/ESPEED(6Ol4AT0R0St60)/V6RllOl4X{88Sl4NV0LT,tlB)COMMON80 
DIMENSION  VAL(8)iNuT(8)4NQT(8)4lPDX{80/801/ISPEED(80)iTlMMAX(5)  C0MMOB81 

"aiMENSI0N-TIMLEN(5)/'TTMAVat6)  - - --  COMMON88 

COMMON  VARjX/NVOLT/VAL/NlT/NQT/IPOX/ISPEED/TIMMAX/TIMLENiTIMAVQ  COMMON23 
equivalence  |FTIME(1)4X(46)  )/  (ESPEE0(1)/X(106))4  (AT0RQ6(l)4XU66nCBMM0N84 
COMMON  lOLDl/IOLDa/IOLOS/ISWl/ISWE/ISwa/IENGNO/IENQIN  COMMON8B 

COMMON  ElNTRQ/FlNTROiRIFiBFlNR/DFDOT/QNU/FGNU/TRQIDLiTSICD/R/OF  C0MM0N26 
DIMENSION  C0MM(26)4ENQTRQI8O)4ENGFUL18O)#EN9VAC18O>/ENQSTT(8O) 

DIMENSION' EN6STP(80T#EFFT*Bt949»9)»RAEFTBtll4ll)  

COMMON  COMM/ENQTRO/ENQFULiENQVACfENOSTT/ENQSTP.EFFTAB 

dimension  Aiioi/caoj 


501 
511 
'821  C 
531  C 


COMMON  AiC/FUIDL/VACIDLaNBPEEO/NVEL/NTIMES/SPDINCiVELINC/TIMINC 
COMMON 'TFTORQ/RIEPIF/CVTTRQa ISIM/TSNEH/BSNEW/TSICDN/TSICDO 
COMMON  RPiRPPjFOBHP/TCVTLS/TCLULB/RPMlNiRPMAXiTT/TCATF 
'COMMON-  RASCAL/ENTORO/FORAOjtQArN/EORAQ/RAtFTB/RATKLS/OTf  

dimension  QRATioaol 

COMMON' QRATlO/RMlNiRMAX/ICLUCH/CVTSCL' 

COMMON  /Shift/  rminasuoi/RmaxasuO) 

COMMON  VQRINIT/INEXT'  ' 

COMMON  /ACCELN/AEPA 
"COMM8N~70SLAY/TaDTM8#TBOTti 

THE  inputs  to  this  SUBROUTINE  ARE  , , 

R.,. ....Ratio  of  driveshaft  speed  to  flywheel  speed 
IQEAR-. -Current  gear,  zero  if  neutral. 

RPMIN---!|IINIMUM  allowable  CVT  RATIO 

"RPM^AX'*  — maximum  ALLOWABLE'CVT' RATIO  ' ' ....  

RMIN..*.((I1nIMUM  allowable  transmission  system  ratio 


C0MM0N27 

C0MM0N88" 

COMM0N29 

C0MM0N3Q  ■ 

COMMON31 

C0MM0N32 

C0MM0N33 

C0MM0N34- 

C0MM0N35 

C0MM0N36 
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C-  — • RMAX  — -t^AXlMUM  ALLOWABLE  TRANSMISSION  SYSTEM  RATIO 
55|  C--—  THE  OUTPUTS  ARt 
061  C-—  I3EAR— .The  new  transmission  QEAR 

57j  X»»--  RP  — T»tTHE  cvr  RATIO ■ 

S8i  RPP The  new  transmission  ratio 

591  • 


601  If  (IOEaR)  10«10«20 

611  C*»**«QEAR  BOX  IN  NEUTRAL 
68(  • 

631  9 STIME*Ot 

6*1  10  STIMEpSTIME+PT 

■65|  ircSTIME  .LEt  TBDTMS)  RETURN 

66t  • 

671  IQEAR  • INEXT  ^ 

6S|  IP( IQEAR  .QTi  NQEAR)  IQEAR  ■ INEXT  • NQEAR 

69{  ICLUCH«t  “ ~ 


70J  20  IP  (RfcRMlN)  55/55i28 

711  28  ir  (R.RM*xr30<30i60  

721  30  continue 

731  C**««»CALCULATE‘ RATIO  LIHITS  IN  CURRENT  QEAR 
76}  TRMIN.RmINAS(IQEAR) 

75t  ~ — ‘TRMAX«RM*XAS(  IQEAR)  ' “ 

761  IP  (R-TRMIn)  35/35^*0 

771  36  ' continue  ’ ' " ' 

76|  C»**«*D0WNSHIPT 

79l  INEXT. I0E*R*1 

sot  ICLUCH  * IQEAR  * 0 

'811 arro'B 

821  • 

63t  *0  CONTINUE 

8*1  IP  (R.TRHax)  50«50/*6 

851  UPSHIFT  . - - . 

861  *8  INEXT. lOEAR.l 

“87j  ICLUCtTi'lQEAR  • 0 ~~ 

88)  GO  TO  8 

891  • 

901  80  continue 

91]  C*.*«*CALCULATE  transmission  QEAR  RATIO 
92(  RPP.QRATlO(IQEAR) 

“931  C**»**C*LCULATE"CV'rRATI8 

9*1  RP.R/RPP 

951  RETURN 

96t  • 

971  “65  CONTINUE 

98|  C»*.».R  18  less  than  MINIMUM  RATIO 

“99  r 1 QEAR*  1 

1001  RPP.QRATIO(l) 

lOlt  RP.RPMlN 

1021  IP  (AEPA)  56<56/59 

1031  C...9.ACCELERATIBN  NOT  REOUIREPi  OPEN  CLUTCH) 
10*1  66  ICLUCH.O 

105| IP(T9IC0N  » 0.0)  T9ICDN  . 0.0 

1061  RETURN 


• • I • • 

1071  • 

1081  59  CONTINUE 

1091  C**«**ACCEtERATlON  REQUIRED*  SLIP  CLUTCH* 

1101  rcLUCH  • 1 

nil  return 

1121  • 

1131  80  CONTINUE 

llAt  C»»*«*R  3REATER  THAN  MAXIMUM  RATIO  (SHOULD  BE  IMPOSSIBLE) 
list  IQEARiNQEAR 

~116J‘ RPP»QRATlO(NQEAR) 

1171  RPiRPMAX 

1181  RETURN''' 

1191  END 


I • * • • 

II  • • •••»  PSPEEO  •••• 

t|  function  F6PEED|ARRAY*N#VALINC*VAL) 

3|  c---»  subroutine  to  provide  interpolation  for  engine  parameters 

41  c»-*«  R*R*RADTXE  1/29/75 

5l  DIMENSION  ARRAY(l) 

6)  I'VAL/VALINC 

7l  rem«val*valinc#i 

81  l»l*i 

9|  • 

101  IPfr *QEi  N) 'FSPEED  • ARRIY(N)J  RETUBN 

11)  • 

181  FSPEED»ARHAY( I)*REM*(ARRAy(Ul)»ARRAY(I ) )/VALlNC 

13|  RETURN 

lAI  END 
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••••  HYBLSS  •••• 


• • « 

n 

21 

31 

— 

51 
61 
71 
81 
31 
“lor 
U{ 
121 
13t 
■ 161 
151 
“16J 
171 
18J 
19| 
“20i’ 
211 
" 22  r 

231 
26t 
25J 
26  i 

271 

"281 

23J 

30S 

311 

321 

33» 

361 

35; 

36; 

37; 

38; 

331 

■'601 

61; 

621 

631 

66; 

65; 

“66  r 

67; 

68; 

68; 

50; 

511 

“521 

53: 


SUBRBUTII^E  HYBLSS 
C-...  SUBR9UTINE  T0  CALCULATE  HYBRID  ENERGY  LOSSES  . , 

• THIS  VERSIBN  of  HYBLSS'IS  BNLYFOR  THE  DIGITAL  SIMULATION 

C..—  R.R.RADTKE  1/30/75 


COMMON  Rlt#TMAX/VACMAXiVVlMl«VVlLFR<VVI26R»VVllCDiVVlM»VVIlRF 
COMMON  VVIMDR/VVI0RR*AVIB*AVlBjT8I10R<AVlMiVVlFUB*YVlFUS 
COMMON  VVI8H0<VVISH«VVIAMX/VVIAS<VVllCFiTVIJCT,TVlJTR«TVIJRA 

“COMMONn’VlJTW/SCALEF/OELMlNAFUELWnTlDLEiOT-,  V"'..  ' 

COMMON  NVEPA*RIEINV*HRPSEC«BAXL1N,EPS»NQEAH, IBUTilPRNTiLOAOEQ 
DIMENSION  T8INV(11)/IVEPA(3000) 

DIMENSION  VMlN(2)iVMAX(2)/VlNT(2)>N0IM(2) 

DIMENSION  0ACC0Ntl6)#ADCC0N(15) 
dimension  TVICRL(16) 

■XOMMON“T*IN\r' 


C0MM8N01 
- -C0MMBN02 
C0MM0N03 

COMMOM06- 

C0MM0N06 
— common  6“ 
COMM0N07 
C0MM0N08 
COMMON09 
-COHMONIO" 

COMMON  iyEPA/VMIN/VMAX/ViNT/NDIM«DACCaN»A0CceN4TVlCRL  C0MM6N11 

COMMON  "TIME* NRUN,lN0IC/NRCCiNFUEL*ICC0CK»lCL0K0iTS«B8/0BHPj TORO—  C0MM0N12  - 

COMMON  3STBRQ*ESDOT#PAaC»RAON*PPOB«TAOC<TAON  C0MMBN13 

COMMON  T3IC<T9INiT8DN«T90C«T90N  ...  C0MM0N16 

COMMON  T3I1<T9I1QR, VVOS* VVOAi VVOD<AVlO«AVlS«TVlMJj VV0F/VV0MIaPA8FRC0MM0N15 

COMMOITFUELE/ITICYCi  ICLOKl#l8HIFT4WHL8LPiiWHL0LO.""; ~ COMMONIS- 

COMMON  iCYENO/NLlNEi ICYCLEiNGIjNQIOLD/VEPAiVANALQiPAOFROi VVOAO  C0MM0N17 

COMMON  V«OSO»DELTA,DELTi ISEOi I90»ESD0T04 I8EAR  ' COMMONIO' 

EOUIVALENCE  ( OIST/ yVOD ) 4 ( 0S< VV IBBR ) . . C0MMBN19 

DIMENSION  FTIME(60)iESPEED(60)4ATeR88(60)4VAR(10)«X(22B)4NVeLT(IB)COMMBN20 
DIMENSION  vaL(2)/NlT(2)iNOT(2»4IPOX(20420)aISPEED(20)/TIMMAX(B;  C0MM0N21 

■  dimension  TIMLEN(5)4TIMAV0f6)  --  -COMMON22- 

COMMON  vARjX^NVOLT^VALjNLTiNGTilPOXflSPEEO/TIMMAXiTIMLENillMAVQ  C0MM0N23 

EQLII VALENCE  (FTIME(1)jX(6«))i  (ESPEE0(1>4X(106)  J,  ( ATOROSI  1 )i X ( 166)  »COMMON26 

COMMON  lOLDl/ 10L024 I0L03# ISWl# ISW2j ISw34 IENQNO, IE^QIN  C0MM0N25 

COMMON  E1NTRQ4FINTR04RIF,RFINR4DFO0T4GNU/PQNUjTROIDL4T91CD4R<PF  C0MM0N26 
DIMENSION  CBMM(26)4ENQTRQ(20|/ENQFUL(20)/ENQVACj(20)<EN08TT(20)  C0MM0N27 

DIMENSION -ENGSTP(20)4CFFXABI943/3)4RAEFTB(ll4in  ' COMMONBO 

common  C0MM4ENOTRO4EN3FUL/ENQVAC4ENQ6TT4ENQSTP4EFFTAB 
DIMENSION  A(10)4C(10)  .... 

COMMON  AiC4FUlDLiVACIOL/N3PEE04NVEL4NTIMES4SPDi;^C4VELlNC4TIMINC. 

COMMON  TFtbRQ<RIEP1F,cVTTRQaISIM4TSNEW4BSNEWjT9IcDNaT9ICD0 
COMMON  RP4RPP4F0BHP4TCVTlS4TCLULS4RPMIN4RPMAX/TT4TC<TF 

■  COMMON  RA8CAL4ENTOR04FORA04eQAIN4CORA04RAEFTB4RATKL84DTP  ' — 

dimension  SRATIOdO) 

COMMON  QRATIO4RMIN4RMAX4 ICLUCH4CVTSCL 
DIMENSION  CC(10)4AA(10) 

COMMON  /SUMVAR/CC4AA 
COMMON  /£PASH/VCRUS4DUM(8) 

COMMOi'TVfR/VVOFN ~ 

“ 0*TA'CON8T/0*00533333/ 

delta  * DT/2 

DELCON  • delta/2626. 0 

-C0NST-«-22/l5/275 ' 

RACON  ■ VV08*C0NST 


C0MM0N29 

COMMON30 

C0MM0N31 

C0MM0N32 

C0MM0N33 

COMMON3A- 

C0MMBN3S 

C0MM0N36 

COMMON-  - 
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• • 


541  A(l)fA(l)*0ELC8N 

55(  A(a)"VVDF«(?AC8N*DELTA 

561  A(3)»A(3)*DELC8N 

57l  'A(4)»A(4)*0EI.CeN 

5S|  • 

59;  A(5)  • .TSiN^OELCON^ITSICfCVTTRQ) 

60!  irCTSlC  P 0.0)  A(5)  ■ OtO 

6U  • 

6S;  A(6)«A(6)*orLC8N 

63;  ^A'(7)tRATKLS*T9lN60ECC6N  ~ 

64;  A!8)»A(8)*0£l.C8N 

65;  A(9>»A!9)*0ELC8N 

il  661  Aa0)>AU0)*0ElC8N 

67; AA(l)»AA(n«DELC8N ■■ 

66!  AA(g)>AA(8)«DELC8N 

6f!^f  ^ 

70!  ir<AEFA  » 0.01) 

711  l“  AAfr)  » VVDFM*RAC8N«DECTA) 

73;  2 AA(3)  f WOP  «RAC8N»0EtTA 

73;  irfvvos  f vcRus.o.oa;  “ 

74;  1 AA(4)  • VVOF  *RAC9N«0EtTA 

791 rrrAEPA-oo.on  ^ ^ — 

76 1 1 AA(5)  ■ VVOF  «RAC0N*0Eli:TA 

771  * : 

78;  AA(f  )tAA(6)*0ElC8N 

79;  09  ao-iitjio'  ■ 

80;  C(I)f  C(!)t  A(I) 

— ' — 811 ccrniccm  «a  m 

82;  20  continue 

83!  RETURN  

84)  end 
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• INCNHB 


il  * 
Zt 

31  C*' 
-4[-r=- 
51 


•I 

71 

" 81 

31 

“ior 

I2l“ 
131 
“i^l 
161 
ur 

171 

" i«r 

191 
" ZOl 
Zll 

331 
38  r 

891 

3»r 

Z7| 

— 311" 
291 

“ 3or 
311 
32} 
331 

— 38  r 

35} 

"3*r 

371 
~ 38} 

— 8cr 
811 
8Z1 
83} 

■ 881 
851 

86  r" 


SUB85UTINE  INCNHB  . ... 

— SUBR9UT1NE  T8  INITIALIZE  C6NSTANTS  FOR  9IMULATISN  8F  HYBRID  CAR 
iARiRtRADTFE  1/28775  ''  — 

M8D1F1EO  F8R  DIESEL  9N  13  5CT  1976 
H8DIFTEO  FBR  PRBOUCTTBN  RUNNInO  8N  I HAR  1977 

C5H5BN  RJEirMAXiVACKAX7WlFir#V'nLFR<Vvi2BRiVVliCD#VVin*VviiRF 
C8MHBN  vyiMDR>VVI0RR/AVlB»AVIR,T8I13R«AVIM»VVIFUH«VVIFUS. 

CBRRBSr  VVlSWB«WlSRlVVTAffX>VVIAS»VVIlCF»TVIJCTiTVIJTR#TVtJRA 

C8HH8N  TVIJTW,SCALEF/DELMlN/FUELWTiTIDLE»DT  ..... 

■ "CSFIHBN  NyEPAjRICINViHRPSEC#MAXLlN,EPS«NQEAR,  IBUTiIPRNTiL8ADEQ 
0IMEN3IBN  T8INV(11)»IVEPA(3000) 

OIHENSISN  VMINt2J«Vf'AX(2I>VlNTt2I<NDlH(2) 

DIMENSIBN  DACCBN(1SJ/ADCC8N(15) 

DIF1ENSI6N  TVICRLU6T 

C8MM9N  T8INV  ...  ....  . - 

""  C9HPBN  IVEPA/'VHINi-VfAXTVTfrnNOTWiOACCBNjAOCCBNlTVICRL 

CBUMBN  TlHE,NRUN#lNDlC*NRCCANFUELi ICLBCK* ICLeK0«TS»BS#BBHP,T8RQ 

CBHHBN  SSTBRQ»EBDBT4PABC»RA9N»PPeB«TA8C#TABN 

CBMMBN  T9IC<T9IN«T8DN»T9BC#T98N 


CBMHBNIO 

CBMHBNir 

C9MM8N12 

CBMMflN13- 


...  . CBMMBNIA 

-CBirniBH-TBl  i nBtniRTVVBBryVBAl VVBD«  AVtBrAV  I SjT VI5  ji  YVDPyVVDWiTPABf  RCBHWBN15- 

CBMMPN  FUELE#ITlCYC<ICLflKliISHlFT»WHL6LPAWHLeL0 --  . CBMM6N16 

-CBMMBV  iCYEND/NLlNEj ICYCL£>NQIiN0I9L0/VEPA|VANALG«PA9fR0yVVBA0  C9HMBN17- 

CBMMBN  VV980*0ELTA,DELT/16EQaI9B#ESD9T0<1QEaR  CBHM6N18 

XOUIVALENCE  IDIST/VVBDJ/ IBSAVVIBBR)  . . . • T C9«>^BN19 

DIHENSIBN  FT1MEI60);ESPEED(60)/AT9R08(60)aVAR(10)»X(ZZS)»NVBLT(19)CBMMBN20 
"UIREFfSlBN  VALT2myCTT2TiTraTT2TnPDXt20i20>71SPEEDt20)7TIMrmXT5r  CBlIHBNei 

DIHENSIBN  TII^LEN(B)aT1MAVQ(5)  . , , CBMH8N22 

' CBRBBN  V*RiX/NVBLT|VAL»NLT/NQT3lP0XiI8PEE07TiriHAX«Ttnt6NlTiriAV0  : CBMMBN23- 
equivalence  (FTIME(1)|X(86) )/ (E8PEEDU1»X<106) )*(AT9RQS(1)/X(166) )C6HM6N28 


CBnflBN  IBlDIa  1BLQ2A  IBL03>  ISnii  tSW2i  ISW3«  1ENQNB«  lENQlN 
CBMMBN  ElNTRQ»FlNTR0»RlF»RFlNR»DFD9T*QNU»F3NUiTR0IDL<T9tCD«R#0F 
"DTnENSlBN  CB5HT2577EN!rrRin20T}^NGFOLI20>iENl3VAC.120)iEN0STTT20r- 
DIHENSIBN  ENGSTP(Z0)/EPFTAB19»9»9)#RAEFTB(11/11) 

CBHHBN  CBHH«ENQTRO*CNGFULaENQVAE#ENGSTT#ENOSTP*EFFTAB 
DINENSIBN  A(10)«C(10)  , . ..... 

CBHHBN  AAC»FUlOLAVAClDU'»N9PEEOANVELiNTIME8}SPDI5/C«VELTNCjTIHINC 
CBMMBN  TFTBR0ARIEPlF,cyTTRQ/18IM,T6NEW<BSNEW*T9IC0N/T9ICDB 
- CBMMBN"Wl»i RPP»f  BBHPJTCVTC8#  TCLUtSi  RPMIN/ RPMAXA TTi  TO  TF 
CBMMBN  RASCAL*ENT9R0<FDRAQ/EQAIN,E0RAQ<RAEFT8#RATKLS<DTF 
OIMENBIBN  QRATIBllOl 
CBMMBN  ORaTIB/RMIN^RMAX/ ICLUCH*CVTSCL 
EQUIVALENCE  ( VAROliGAINJ 
C8MMBN  /Shift/  RMINAS(10)#RMAXAS(10I 
UIMENSIBN  aEREFFIlOT  


CBMM8N25 
CBMMBN26 
•CBMMBN87 
CSMMBN28 
CBMMBN29 
CBMMBN30 
CBMMBN31 
CBMMBN32 

C6MMBN33 

C9MMBN38 

C8MMBN35 

C6MMBN36 


CBMMBN ^ — 


87| 

CBMMBN  /EFFGER/GEREFF 

CBMMBN 

881 

CBMMBN  /FLYEFF/PERLBS 

CBMMBN 

891 

DIMENSIBN  CCI10)#AA(10) 

501 

CBMMBN  /SUMVAR/CC»AA 

CBMMBN 

511 

C9MM6N  /GEARAI/AICVT 

521 

CBMMBm  /DELAY/TSDTMSiTBDTR  ■ ' 

531 

C9M"Bn  /EnGW/FNDT/NDT 

S*J  C9MMBN/cyTT9R0/CVTnAX 

55|  0IMENSI9N  1C9MM(5S)  - 

96t  . EQUIVALENCE  (IC9MM,C9MM) 

'571 0IHENSI9N  ENGTR(20) — 

96*  # 

691  104  r9RMAT(8El0i3) 

601  105  F6RMAT(8I10) 

611  106  FeRMAT(l6F5tl)  

68:  109  F9RMAT(13P6.1) 

■ 63 ( lIO'FBRMATt  13A6 ) 

64«  lie  F9RMAT(El0i3*Il0)  _ ( , v r . ■ ■ ■ » : 

6Bi  ■ eo4  f9Rmat(3Eio*3*fio.iaiio)  ■ ■ 

661  209  F9RMAT(l2F8.l) 

671  '"990  F9RMAT(Hl)  

68)  1000  F9RMAT(4X,6HSPDINC*aX<6HN6PEE0) 

69|=~  loop  F9RMAT(E;0.3iI8) 

70)  lOlO  P9RMAT(9HEnGTRQ( I n 
rij  1015  T9RNAT(16HENGTR0(n»8CALEF) 

721  1030  F9RMAT(9MENGFULn  ) ) . . 

■73T“  1040  F9RMAT(4X<6HVELINC;4Xi4HNVEU 

74)  1050  F9RMAT(9HENGSTT(I) ) 

7Sr  ‘I052"FBRMAT{4Xi6NTIf1lNC/4X/6HNnMES)  ' ■ ' " ' “■  " 

761  1054  F9RMAT(9HENGSTP(I1) 

77|  1060  FBRMAT(4X/6HTRQIDL/5X«5HFUIDL) 

781  1062  F9RMAT(l3HTRQIDL»SCAtEF) 

791  1066  F9RMAT<4X,6HCVTMAX) 

801  1070  F6RMAT(5HT81NV) 

8ir"1080"F9RMAr(l4HCVrXFF,"TABLE1  ' 

82:  1090  F9RMAT(21h  REAR  AXLE  EFF,  TABLE)  ' 

831  IlOO  F9RMAT<8H«TV1CRL«) 

84)  1110  F9RMATt3X/7HVM:N(l)A3Xi7HVMAX(l)<3X/7HVlNT(l)) 

851  '1120  f’0RMAT(3X<7HVMlN(2l#3X«7HVMAX(2)«3X/7H¥lNT(2)  ) 

86)  lies  F9RMAT(30H**INERTIA  UNITS!  LB-FT-SEC/RPM ) 

871  “Tie6  F9RMAT(H  + /32X<32H«  1LB»FT«FT1 •2*3# 14lS9/60«32i 174 ) 

881  1130  F9RmaT(7X<3HR1F) 

89)  1140  F9RMAT(7X,3hRIE)  ... 

901  1150  FeRPAT(5X,6HVVIMIi6X/6HVVlLFR/4X/6HVVI2BRi4X<6HVVllCD< 

'911  1 6X<4HVVIM,4X/6HVVIIRF|4X*6HVVIMDR»4X*6HVV1DRR) 

92)  1160  F9RMAT(6Xi4HAVIBi6Xj4HAViR*4X<6HT8Il6R)  . . 

93:'  '1170  FORMAT  (4X/6HVVIFUM,4X«6HVVlFuS<4X,6HVVISwB/5X<5HVVISHi|»X,6HVVIlCf') 
94)  1180  format (4X/6HTVIUCTi4X/6HTVIUTR>4X/6HTVIURA<4X/6HTVIJTW) 

95l  1190  FBRMAT(4X/6HSCALEF,4Xi6HFUELWTi4X,6HDELMlN), 

961  1200  FBRMAT(4X,6HTBDTMS,5X<5HT8DTH<6X«9HGA1n(»0T) ) 

97|-1210  F8RMAT(5X#9hNQEAR) 

98)  1220  F9RMAT(9HQRATie(ln 

■'99)“1230  FSRMAT(9HRmINAS(I)J 
100:  1240  F9RMAT(9HRMAXAS( I ) ) 

loll  leso  PeRMAT(9HQEREFF(I))  

102)  1260  F0RMAT(4X,6HPERL8S) 

1031  1270'-F0RKAT(5X,5HA1CVT) 

104:  1280  FeRMATt5Xj5HRPMIN/5X/5HRPMAXi7X/3HEP6) 

105:  1290'  F8RMAT(5X,5HFDRAG/5X»5HEGAlN,5Xi5HEDRAQr■ 

l06:  1300  F9RMAT(4X,6HRASCALa4X<6HCVTSCL) 


107 

10b 

109 

no 

111 

lie 

113 

ii'* 

115 

"116 

117 

118 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

146 
■ 146 

147 

148 

149 

150 

151 
"152 


1310  Fn«MAT(6Xi4Hl9UT»4X»6HU8A0E8) 

1320  F8RMAT(8X*2H0T/7Xi3HDTF) 

1325  F8RMAT( 10hTSDTMS*DT»F5.31 

■1330'F8RMAT{28MCBNSTANTS'C8MPUTEO‘IN  INCNHB)  . - 

1340  F8RMAT(3Xi7HMDIM(l)j 3Xi7HNDlMl2)i6X<4HAVlM«6X#4HAVIS< 

1 6Xi4HRMlN«6X<4HRMAXi4X/6HRlElNVi4X46H8teFlF) 

1350  FORMAT (4X<6HHRPSECi4X/6HVVIAMX#5XjSHVV I A8  6X/ 4hFN0T< 7X» 3HN0T I 
1360  F8RMAT(14hl4C8MMENT  CARD*)  ' 


— IF(SENSE' BWITCH-6)  2>T~ “ 

1 CONTINUE 

• IER8»8Ur  COMMENT  ARRAY 

08  6n  • 1;52 

■■  ■ ICBMM(I)“  • OH  ■ " " 

6 continue 

-C,^4,ir-READ  CVT  EFFICIENCY“TA0LT  ~ 

print  1080 

~ call  TURKEY(EFFTAB) 

• TOP  OF  page 

PRINT  990  ■ 

C»-*»  READ  IN  REAR  AXLE  EFFICIENCY  TABLE 

PRINT~1090 

CALL  READRA(RAtFTB) 

c— ••  oriveshaft  resistive  torque  road  load  data 
READ  106<TVICRL 

PRINT  1100  

PRINT  106<TVICRL 

C*-V4'REAO  THROTTLE'  MAP  ‘ 

READ  llStSPOINCiNSPEED 
PRINT  1000 

PRINT  1005,9POINC<n5PEE0 
^ READ  104<(ENGTR  ( I >/ I*1jNSREED) 

PRINT  1010 

PRINT-104A(ENGTR  tI)ir*l<NSPEED)  ' 

C-— f READ  FUEL  CONSUMPTION  MAPS 

read  l04#(ENGFUL(IIiI*nN8PEEO) 

PRINT  1030 

“ PRINT  104>(BNGFULm<I*ljNSPEE0) 

C.— • ENGINE  CONTROL  PARAMETERS 

READ  “1“12*VEL1NCjNVEL 

PRINT  1040 

PRINT-  100S|VELINC/NVEL. 

READ  104,  (ENG8TT(  I )n*nNVED 

~ PRINT  1080  

PRINT  104,(ENGSTT(I)jI*1,NVEl) 


153 
■■■'  154 

155 

156 

157 

158 

159 


SAVE  NVEL 

NVELSAVE  • NVEL 

READ  112,TIMINC,NTIMES 

PRINT  1052  ■■ 

PRINT  1006,TIMInC,NTIMES 

READ  -‘104, -(ENGSTPI  ITlIFIiNTTMES)- 

PRINT  1054 
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160J  PRINT  10'»/(ENQSTP(n*I«ljNTlM£S) 

161;  C*-—  ENGINE  T9RQUE  AT  lOLE 
162;  READ  lOTiTRQID  /PuIDU 

163;  ■■■  ■'  PRINT'  1060  

16AJ  PRINT  106*TRQI0  /FUIDL 

165;  • read  max  CVT  BUTPUT  TBROUE 

166t  read  lO'^/CVTMAX 

“ ■ 167;  " PRINT  1065 

1661  PRINT  104/CVTMAX 

169I  C-—  DRIVrSHAFT'SPEEir  AS  A FUNCTIBN  BF  VEHICLE  SPEED 

1701  READ  10?»T8INV 

1711  ■ PRINT  1070'  ‘ 

1721  PRINT  209*T8INV 

— 1731  C— “ READ  IN  DEFINITION  8F  CROSS  CORRELATION 

17A|  READ  10A/VMIN(1)jvMAX(1)jVINT(1) 

1751  PRINrillO  

1761  PRINT  lOAiVMlN(l)#VMAX(l)iVlNT(l) 

1771  READ  ■ 10A»VM1N(2)«VMAX(2)/VINT(2) 

1781  PRINT  1120 

179T  PRlNr  10A/VMIN12)«VMAX(2)#VINT(21 

1801  ND1M(1).(VMAX11).VMIN(1))/VINT(1)+1 

181 r ' N0IM(2)»(VMAXr2)-VMlN(2) r/VlNT(2)+l  ■ - - 

1821  • ENGINE  INERTIA  UNITS  SAME  AS  FLYWHEEL 

1831  * engine  inertia  - 

18LI  READ  108<RIE 

1851  PRINT  llAO 

186!  PRINT  IOA/RIE 

1871  C---T  INVER6E~ENG1NE'INERTIA  

1881  RIEINV  • 1.0/RlE 

1891  C— ••  AIR  PRESStjAIR  TEMP^REAR  AXLE  RATIO 
1901  read  10A<AVIB«AVIR«TSI1GR 

1911  PRINT  1160 

1921  PRINT  10A*AVIB<AVIR*T811GR 

193T  C-— 'CALCULATE' air- DENSITY ‘ 

1941  AV1M»2.702912»AVIB/(459.67*AV1R) 

195!  C--*-  SET  THE  WIND  SPEED  TO  ZERO 

1961  AVIS-O 

1971  C---*  TIRE  parameters 

198)  READ  10A«VVlFUM<VVlFuS«VVISwajVVISH<VVllCF 

-■—'199;  PRlNril70 

2001  PRINT  104,VVlFUM«VVlFUS>VVISwBiVVISH<VVllCF 

201)  C---'  POLAR  MONENTS 

2021  READ  lOAiTViJCTiTVIJTRj TVIJRAiTVIUTW 

2031  “ PRINT  1180 

2041  PRINT  104,TVIJCT<TVIJTR/TVIJRA4TVIJTW 

2051  C---‘T' length '9F' TIME  FOR  SHIFTINQi“TIME"  BETWEEN  SHIFTS  IN  SECONDS 


2061 

READ 

104#TB0TMS»TBDTHiGAIn 

2071 

PRINT 

1200 

2081 

PRINT 

104* TBDTMS<TBDTHj GAIN 

209;  • 

TOP  9F  PAGE 

2101 

PRINT 

990 

2111  ■■■ 

■ ' READ  ' 

105*NGEAR 

2121 

PRINT 

1210 
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2131  PRINT  105iNGE.AR 

2141  READ  10*1 (GRATI8( I ) j I«1<NGEAR) 

215:  PRINT  12?0 

216*1  PRlNnORilGRATieUlil'l^NGEARl 

217|  READ  104j(RMlNAS(niI«l»NQEAR) 

■ 2181  PRINT' 1230 

219|  PRINT  10*1 (RMINAS: I )< I«1>NGEAR) 

2201  104,  (R4IAXASI  IJiI«l/NGEAR) 

2211  PRINT  12*0 

— 2221  PRTNT'lOSilRPAXASdlTI'l/NGEARl  

2231  READ  10*, ( QEREFP ( II i I «1, NGEAR ) 

■ 22*i  PRINT  1250 

226:  PRINT  10*,(GERErF(I),I»l,NQEAR) 

2261  READ  10*,PERL8S 

227i  PRINT  1260 

228:  “PRINriO*,PERLBS  ' • . 

225:  READ  10*,A1CVT 

230:  ‘ " PRINT"  1270  “ 

23i:  PRINT  10*,A1CVT 

232:  READ  "10*,RPMIN,RPMAX,EPE 

233:  PRINT  1280 

23*: PRINT-10*, RPMIN,RPM*X,'EPS — ' — ' 

235;  READ  10*,FDRAG,EQAIN,EDRAQ 

2361 PRINT-1290 

237)  PRINT  10*,F0RA0,EQAlN,E0RAa 

2381  READ  "10*, RASCAL, CVTSCL  “ 

239:  PRINT  1300 

— — 240J pRrNT-ro*>eAscAL,cvTscc — — ■■  — 

2411  READ  105, IBUT,LeADCQ 

2*2:  ■ PRINT"1310  ■ ' 

2*3:  PRINT  105,ieuT,L6ADE0 

244;  •-  RMIN  4 RPMIN*GRATI8(1> 

246;  RNAX  I RPhAX«QRATl8(NQEAR) 

2461  C-”-"nME-rNCREMENT “ “ " 

2*7:  READ  10*,DT/0TF 

2*8:  - PRINT' 1320  " ■ 

249:  PRINT  10*,DT<OTF 

-'250:  FNDT  • NOT  ■ OT/DTF  ♦ 0.5 

25i:  • CORRECT  TBOTMS  IF  LESS  THAN  OT 

2521 IFCTBDTMS  '8  OTT  -TBOTHS  A OTT"  WRITE  (108, 1825)  TBDTMS 

263:  C---»  HOURS  PER  SECBNO 

25*1  HRPSEC»l»/3600. 

265:  C-  — • LINES  PE«  PAGE 

256)  MAXLlN«*a 

257:  • 

-258i“»~-PRB0UCTT0N-RUNS"START''HERE 

269)  • 

--260:  2 CONTINUE 

261 : C— ” READ  IN  COMMENT  CAROS 

262:  ' READ  110,(C0MM(I),1  . 1,13) 

263)  PRINT  1360 

26*1  PRiNT~iio,'(ce'iMn),r",-iii3)  ~ - - 

266)  C-»--  read  in  driving  CYCLE 
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C*LU  fiDEPA 
“T9P  BF  PAGE 
PRINT  990 


# RESTBRE  .NVEl 

NVEU  i NVEL5AVI  - — 

* READ  flywheel  INERTIA.-UNITSI  LB-FT-SEC/RPM 
READ  10‘t#RIF 

PRINT  lias 

PRINT  uas 

PRINT  1130 

PRINT  104, Rir  - 

RIEPIF  • RIE  * RIF 

-Citii-DRAQ  CBvSTANTS'  7-  7"  . . ...  " 

read  104<VVlHl,VVILFfi,Vvl8BR,VVIlCD»VVlM,VVIlRR,VVlMDR,VVIDRR 

PRINT1150  ■ rr  — . . . , ... 

PRINT  104,VVIMI,VVILFR,VV!2BR,VVI1CD>VV1M,VVI1RF,VVIMDR, VVIDRR 

• ENGINE  scale, FUEL  WEiGHT,  . . 

READ  104,SCALEF,FuSLWT,d6LMIN 

PRINT' 1190  

PRINT  104,8CALEF,FuELWT,DELMIN 

• ■ " , ■ 

• multiply  tbrque  values  by  the  scale  factbr. 

-f  - - 

08  10  I • i,N8PEE0  ..  ... 

. enqtroii)  • ENGTR-rirpscAttr 

JO  CONTINUE 

PRINT'  roif ^ :: — ^ . . . . 

PRINT  104,  (ENQiRQtn,!  ■ 1,N8PEED» 

TROIOL  • TfiaiD  49CALEF 

PRINT  1068 

PRINT  104,  tRGlDL'  


5"VVTFun»yVlSMT) 


300i  VVIAS  ■VV1FUS*VV1MDR*VVISWB/(VVIM»(VVISWB-VVIFUS*VVISH)  ) 

'"3011 PRINT  1330 

3081  PRINT  1340  . . .... 

' 3031  PRINT  104,NDTwuniNDTm8)iAVmAVtS,-RMIN,RMAX,RIEINV»RlEPIF' 

3041  PRINT  1350  . ... 

3051 PRINT'  804,HRPSEC,  VVlAHX,  VTIAS/FNOTJNtJT 

3061  • . . 

3071  mNDimi)  9 20  iBRi  NDIH  C81  “P ’80  J . . . . 

3081  1 BUTPUT(108),  'NDIm(I)  AnO/BR  NDIH18)  EXCEED  20  IN  INCNHB'j 

" 3091  ' 2 PAUSE 

3101  • 

31  n'  "* TKAX-'Nrr  USED  ■TN~PRBGRS'"7"BUT'TS"3ETTB  ZERB.  ' ' 

3181  TMAX  ■ 0*0 

3131  • 

3141  RETURN 

3151  end 


E-29 


• t 

II 

21 

31 

■ '*1 
51 
61 
71 
81 
91 

101' 
111 
131 
131 
1*1 
15| 
i6r 
171 
181 
191 
201 
211 
■ 22  r 

231 

2*1 

251 

261 

271 

“28J 

29| 

301 

311 

321 

331 

“3*r 

351 

361 

37l 

381 

391 

' *or 
*11 
*21 
*31 
**l 
*51 

"*6r 

*7| 

*81 

*9| 

501 

Sll 

'521 

53) 


***•  INQRHB  •••* 

SUBROUTIf^E  INQRHB 

SUBRSuTINE  T8  INITIALIZE  CAR  AFTER  ENGINE  IS  IN  STEADY  STATE 
R.R.RAOTKE  1/30/75 " ’ 


Zr-r 

c»»* 

* 

• 18  NBV  1976 


C8MMBN  Rle,TMAX*VACRAXiVVlMliVVlLFR«VVl2aR/yVIlCOjyVlN<VVllRF  CBMMONOr 

CBMMBN  VVIMDR|VVlDRR«AYIBiAyiR»T8I10R/AVIMiyVIFUBtyVIFU8  CBHHBN02 

— CBflMBN  VYISWB«VVISH#VVIAMX,VVIASiVV11CF«TVIJCTjTVIJTRjTVIJRA  CBMHBN03 — 

C8MM8N  TVIJTWiSCALEF, DELHIN<FUELWT<TIDLE<OT  . . CBMMBNO* 

C8MH8N  NVEPA<R1EINV<HRPSEC<MAXLTN<EPS<NQEARJ 18UT< IPRNT<LBADEQ  CBHMBN06-— 

DIMENSIBN  I8INV(ll)j  IVEPAOOOO)  C8MHBN  6 

OIMENSlBta  VHlN(2)<VMAX(2)<VtNT(2)jN0lH(2)  C8MH8N07-' 

01HENSI8N  DACCeN(15l<ADCCBN(15)  C8MHBN08 

“ 'OlflENSIBN  TVICRL(16I ' -CBHI*QNO»— 

C8MH8N  TBINV  C8MMBN10 

■■'CBMM8N  IYEPA<VM1N<VMAX<V1NT<NDIM<DACCQN<ADCC8NJTVICRL  CBMHBNlt— 

CBMHBN  TIMEjNRUNj INOIC<NREC<NFUEL< ICLBCKj ICL8K0<TS<BS<68HP<T8RQ  C8MMBN12 

CBMHBN  SSTBRQ<ESD8T<PABC<RABN<PPBB<TABC<TABN  CBMHBN13 

C8HMBN  T9IC<T9IN<T80N<T9BC<T9BN  , . CBMMBN14 

— C8MMBN'T91 1<T9I1QR<VVBS<  VVBA<WBD<AVIB<  AVI3|TV1MJ<  VVDF<WDMI<  RABTRCBMHBNl  9— 
CBMHBN  FUELE<1T1CYC<ICLBK1<ISHIFT<WHLSLP<WHl8L0.  CBMMBN16 

— CBMMBN  1CYEN0<NLINE<ICYCLE<NQ1<NGIBL0<VEPA<VANALG<RABFR0<VVBA0  “ -CQMMBNl?— 
CBMMBN  VV8SO<OELTA<OELT< ISE0< ieB<ESOBTO<IOEAR  CBMMBN18 

“EQUIVALENCE  (0I$T<yV60)< (08<VVIBBR)  . , . . . COMMaNlS— 

OIMENSIBN  FT1ME(60)<ESPEEO(60)<AT8RQS(60)<VAR(10)<X(225)<NVBLT(1S)CBMM6N20 

““0IMENSI8N-VAL(2)<NCTl2)<NQ7(2l<IPDXT20<2O1/ISPEE0(201<TTMMAXtBJ CBMMBN2X — 

DIMENSION  TIMLEN(5)<TIMAVQ(5)  . CBMMBN22 

CBMM8N  VAR<X<NVBLT<VAL<NLT<NGT<1PDX<ISPEED<T1MMAX<TTMLEN<T1MAV0  CBMMflNBS 

equivalence  (FT1ME(1)<X(*6) )<(ESPEE0I1)<X(106) )< (ATBRQ8(l)<X(166nCBMMBN2* 
CBMMBN' IBL01<IBL02< IBL03< ISW1<1SW2<ISW3< IENQNBjIENQTN  ' 'CBMMBNSS 

CBMMQN  E1NTRQ<FINTRO<R1F<RF1NR<DFDBT<QNU<PGNU<TROIOI-<T91CD<R<OF  CBMMBN26 


'DIMENSlBN'"CeMM(26)<ENGTRQ(20)<ENGFULt20)<ENaVACI20»<EN06TTT201- 
OIMENSIBN  ENQSTP (20 ) <EFFTABI9<9< 9 )<RAEFTB(11< 11) 

CBMMBN  C8MM<ENQTRQ<EN3FUL<ENQVAC<ENQSTT<CNasTP<EFFTAB 
DIMENSIBN  Aa0)<C(l01  . . . . ^ 

'CBMMBN  A4C<FUlDL<VACIDL<NSPEE0<NVEL<NTIME8<8PDIt!iC<VELlNC<TlMlNe- 
CBMMBN  TPTBRQ<RIEPIF<CVTTRQ<1SIM<TSNEW<BSNEW<T91CDN<T91CD8 

-COMMON'  RP<RPP<F8BHP<TCVTL8<TCLULS<RPM1N<RPMAX<TT<TC4TP 

COMMON  RA8CAL<CNTBRO<FORAG<EQAlN<EORAa<RACFTB<RATKL6<DTF 
OIMENSIBN  QRATlBdO) 

COMMON  GRAT18<RMIN<RMAX< 1CLUCM<CVTSCL 
dimension  CC(10)<AA(10) 

CBMMBN  /SUMVAfl/CC<AA 

-CBMHBN'VQRLBSS/TCLSS/TTRTN 

CBMMBN  /QRINIT/INEXT 

AVIO  ■ AVIS  ■ 0>0 
EMISE  • EMISF  • OtO 
ICL6K0»»(1BUT*1) 

■ ICLBKl '•  'ICLBCK  • 0 ' — 

ICYCLE  • ISEQ  • ITICYC  • 0 


-X8MM9N27- 
CBMMQN28 
CBMMBNBS- 
C8MMBN30 
CBMMBN31- 
CBMM8N32 
-CBMMBN33- 
CBMM8N3* 
CBMMBN3B  ' 
C0MMBN36 

CBMMBN 

-€8MH»N 

NEW 


E-30 


5A) 

ICLUCh  f 0 

55) 

lENSlNfZ 

56) 

ISEAR  i 0 

■'57; 

INDICiO 

58) 

INEXT  • 1 

“ 59) 

NQI  • NQIBLO  • 1 

60) 

N3T(1)  • N6T(2)  » NLTli)  • NLT(2)  • 0 

■ 61) 

NLINEiMAXLIN*5 

62) 

PABFRO  ■ PA8FR  • FUIOL 

63) 

RP  • RPMIN 

66) 

RPP  • QRATIB(l) 

65) 

TIME  t'O.O  ■■  ■ 

66) 

T80N  • T9In  . T98N  « 0.0 

67)  ■■ 

T9I13R.T8113R  ’ 

68) 

T9IC08  « 0. 

691  VEPA  f OiO  ^ 

70)  VVBA  • VVBaO  • vveo  • VVB80  • 0.0 

71)  VV8S  .0*0  

^^\  WHUSLD  • 0.0 

73)  08  6‘MililO 

7A|  A(M)  ■ AA(M)  ■ C(M1  • COM)  ■ 0.0 

751  6 CONTINUE  ~~ 

76)  08  10  !«l.ao 

77)  08  10  J.liSO 

78)  IPDX(l.j)  • 0 

79)  10  CONTINUE  " 

80)  08  15  I«l»5 

81 ) '  timavg)  I i^atimleni n~r^MMAX(  I o.o 

82)  19  CONTINUE 

83)  ■ CALL  CBNTH0  “ 

BA)  CALL  CVTQnu 

85)  call  TREFTH(TTRlN.T9tC.  IQIARiTCLSSiORATIO) 

86)  CALL  RAE^Fh 


87) 

88)  • 

“CALL  VEDYNH' 

- 89) 

90)  • 

I3EAR  • 1 ' 

91)  ~ 

92) 

RETURN  

END 
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CBMHBNOl 

C8MM8N02 

CShnONOS 

cenMONO* 

COHMSNOe 

C9MMBN'  6~ 

CBMMBN07 

CBMMBN08 

C6MM6N09 

CBMHBNIO 

CBMMBNll 

CBMMBNIE- 

CBMM8N13 

C8MM8N14 


XI  t • **•*  IN8RTH 

21  " “■  SUBROUTINE  INQRTH 

31  C«>«*  SUBROUTINE  TO  INTEGRATE  SYSTEM  VARIABLES 

-*l  C*— • RtR'RAOTKE  3/3/74  “ . 

Si  common  RlE«TMAX,VACNAX4VVlMl«VVlLfR#VVI2BR#VVIlCD#yVIM«VVllRF 

61  COMMON  VVlMDRiVVI0RR/AYIB*AVIR,T8IieR<AVlM<yvlFU(1«YVlFU5 

7|  COMMON  VVISwB/VVISHjVVlAMX/VVIASiVVllCF*TVIjCT«TVIJTRjTVIJRA 

8l  common  TVIJTW#SCAlEF/OELMlN<FUELWTjTlDLEiDT 

9|  COMMON  N¥EPA»RIEINV<HRPSECiMAXLIN/EP8<NQEAR, lOuTiIPRNTiUOAOEO 

101  DIMENSION  T8INVtllljI¥EP(M3D00I-  — 

11:  DIMENSION  VMlN(2)jVMAX(2)/VlNT(2)«NDlM(2) 

121  dimension  OACCON(15)*ADCC0Ntl5)  ' 

I3l  DIMENSION  TVICRLI16) 

141  ■'  COMMON  TIINV  ' .... 

I6l  COMMON  IVEPA<VMIN<VMAX«VINT#NDIMiDACCON*AOCCON4TVICRL 

161  COMMON  TIMEjNRUN/ IND1C<NREC<NFUEL< 1CL0CK< rCL0K0<TS<BS<BBHP<T8RQ 

l7l  COMMON  SSTBRQ<ESOOT<PAOC<PAON<PPOB<TAOC<TAON 

181  ' COMMON  T9IC<T9IN<T8DN<T96C<T98N  ... 

191  COMMON  T9II<T911QR<VVBS<VVOA<VVOO<AVIOIAVIS<TV1MJ<VVOF<VVOM1<PAOFRCOMMBN16 

201  COMMON'  FUELE<ITICYC<ICL0Kl<lSHIFT<WHL6LP<WHLeL0.  — C0MMBN16 

211  COMMON  ICYEND<NL1NE<ICYCLE<NQ1<NQ10LD<VEPA<VANALQ<PA0FR0<VV0A0  C0MMBN17 

22]"~ COMMON' VV0S0<DELTA<DECT<1SEO<K3B<ESO8TO<IOEAR  — C0MMBN18- 

23|  equivalence  ( 0 1 ST< y VOO ) < ( BS< VV  16BR ) _ . ...  C0MMBN19 

241 DIMENSION  FTIME ( 60 ) < E8PEED ( SOI < ATOROS ( 60 )< VAR ( 10 ) < X (829 J< NVOLTllS )C0MMBN20 

25l  DIMENSION  VAL ( 2 ) < NLT ( 2 ) < N3T ( 2 ) < IPOX ( 80< 20 ) < ISPEED ( 20 )< T1 MMAX (6 ) C0MM8N21 

261 DIMENSION  TIMLEN(5)<TIMAV0(5)  C0MMBN22 

271  COMMON  VAR<X<NV0LT<VAL<NLT<NQT<1PDX<1SPEED<TIMMAX<TIMLEN<TIMAV8  C0MMBN23 

281 EQUIVALENCE  (FTIME  ( 1 )<X(46)  »<  (ESPEED  ( 1 1 < X 1 106 ) ) < ( AT6R0S (11< X1 166nC0MMBN24' 

29|  COMMON  ieLDl<I0LD2<ieL03<ISMl<ISW2<lSW3<lENQN0<IEN(3lN  C6MMBN26 

30| COMMON  E1NTRQ<F1NTR0<RIF<RFINR<DFD0T<QNU<PQNU<TR0IDL<T91CD<R<PF  C0MMBN26 

31 1 DIMENSION  COMM(26)<ENQTRQ(20)<ENQFUL(20)<ENOVAC,(20)<ENQSTT(20) 

321  DIMENSION  ENGSTP(20)<EFFTAB(9<9<9l<RAEFTB(ll<in 

331  COMMON  COmm<ENOTRQ, ENQFUL<ENQVAC<ENQSTT<EN8STP<EFFTAB 

341 dimension  A(10)<C(l0r". “ . . 

331  COMMON  A<C<FU1DL<VAC1DL<NSPEED<NVEL<NTIMES<SPD1NC<VEL1NC<TIMINC 

361  COMMON  TFTSRQ<RIEPIF<CVTTRQ<1SIM<TSNEW<BSNEW<T9ICDN<T91CD0 

371  COMMON  RP<RPP<FOBHP<TCVTLS<TCLUCS<RPMIN<RPMAX<TT<TC<TF 

381  COMMON  RASCAL<ENT0RQ<FDRAS<EGA1N<EDRAQ<RAEFTB<RATKLS<DTF 

391  DIMENSION  QRATlOdOl 

401 C0MM0N~3RATie<RMIN<RMAX<ICLUCH<CVTSCL ^ ' 

411  • 

421  ■ NTIMEPpICLBCK 

431  delta. <nTImEP»1CL0K1)pDT*iB 

441  VVBS.VVOS*(VVBAOtVVOA)»DELTA 

461  IF(VV08  < 0*0)  VVOS  » 0<0 

461  “VV6O.VV0Ow(VVBS0+VVBS1.DELTA*HRPSEC 

47 1 FUELE.FuELE*(PA8FR0*PA0FR).DELTA.hRP6EC 

481  VVOAO.VVOA 

49|  VVOSO.VVOS 

501  PAOFRO.PAOFR 

911  ICLOKI.NTIMEP 

521  RETURN" 

331  END 


C0MM0N27 

C0MMBN28 

C0MM0N29 


CBMMBN31 

CBMMBN32 

CBMM0N33 

C0MMBN34 

C0MMBN35 

COMMON36- 


E-32 


• # 

It 

t\ 

3) 

♦ I 
5: 
6! 
71 
“ 8t 
9i 

'I  or 
at 

I2J 

I3l 

at 

15| 

ur 

17} 

ifit 

191 

sot 

sit 

ssr 

S3l 

s*r 

SB; 
S6) 
S7t 
'38} 
S9t 
30} 
31t 
33t 
331 
'34t 
35} 
36} 
37l 
38 1 
391 
‘60t 
4a 
4St 
43i 
44} 
4B: 
'46t 
471 
48t 
49} 
501 
Bit 
-52} 
53t 


••••  INVRHB  •4»« 

SUBRBUTINE  INVRH0 

••  SUBRBUTINE  TB  INITIALIZE  VARIABLES  F6R  SIMULATIBN  HYBRID  CAR 

.•R.R.RADT<E“1/30/7S  ” . 

CBMMBN  RlE/TMAX/VACNAXiVVlMl«VVlLFRiVVISBR/yVliCD<yVIM«VVIlRP 
CBHMBN  VVIMDR/VVI0RR/AVIB#AVIR«T8116R<AVIM4YVIFUB«VVIFUS 
CBHMBN  VVISWB«VVISH»VVIAMX<VVlASiVVIlCFiTVljCT<TVlJTR<TVIJHA 
'CBMMBN  TVIJTW/SCALEE/OELMIN/FUELWT*TIDLE#OT 
CBMMBN  NVEPA/RIEINV/HRPSEC«MAXLlNjEPS*NaEAR, IBUTi IPRNTjLBAOEQ 

DiMENsiBN-TsrNvtaiavEPAOOoo) — — 

OIMENSIBN  VMIN(2)/VMAX(2)#VINT(2)<N0IM(S) 

OIMENSIBN  DACC6Na5)/ADCC0Ntl5) 

OIMENSIBN  lylCRLllB) 

•■“CBMMBN  T8INV  ^ - 

CBMMBN  IVEPA/VMINiVMAXiVINT/NDIMiOACCBNjAOCCBNiTVICRL 
CBMMBSTTlMEiNRUNnNDICiNREC/NFUELiKCBCKaCLBKoaSiBS/BBHPiTBRO 
CBMMBN  SSTBRQ/ESOBT/PA0CiPA6N«PPBB#TA6C«TABN 
C8MMBNT9lC<T9IN#T8DN,T9eC<T9BN 


C6MMBN01 

CBMMBNOS 

CBMM6N03 

CBMM8N04- 

CBMMBNOS 

■CBMMBN-T" 

CBMM6N07 

CBMMBNOS' 

CBMMBN09 

XBMMBNIQ' 

CSMMBNU 

"CBMMBNtr- 

CBMM8N13 


CBMMBNi4 

CBMMBN  T9iaT9IlQR/ VVB5»VVBA,VV8DiAVlB4  AVIS^TYIMwIj  VVOF/VVDMaPABFRCBMMBNlS 
CBHMBN  FUELE<ITICYC<ICLBxaiSHIFTiWHLSLP*WHLBLO  CBMM8N16 

CBMMBN  ICYENO/NLINE/ I CYCL5» NGI , NQI 8LD< yEPA< yANALS* PABFROi VVBAO  CBMMBN17 

CBMMBN  VVBSO/DELTAjOELTi  ISEOi  1 08, ESOBTOa IQEAR  CBMMBNjr 

EQUIVALENCE  ( D I ST, VVBO ) , ( BS, VV ISBR ) . , CBMMBN19 

OIMENSIBN  FTlME(60),ESPEED(60),ATflR0S(*0),VAR(l01,XtSSB»,NVBLT(18)CBMM8N20 
OIMENSIBN  VAL(S),NLT(2),nQT(2),IPDX<SO,20),ISPEEO(S0),T1MMAX(5I  C8MM8N21 
OIMENSIBW  TIMLEN(5),TIMAV8(5)  . C8MM8NS2 

CBMMBN  VAR,X,NV8LT,VAL,NlT,NQT,IPDX, I SPEED, TIMHAX, T I MLEN, T I MAVQ  C8MM6N23 

■EQUIVALENCE“CFTIME(1),XC46}  ),  (ESPEE0tn,X(106)),  tAT8R0Sm,xn6*J  JCBMMBN24 
CBMMBN  l8LDl,ieL02,I8LD3,ISWl,ISw2,ISH3,IENQNB,.IEN0IN  C8MMBN26 

CBMMBN  EINTRQ,FINTRO,RIF,RFINR,DFDBT,GNU,FQNU,TROIOL,T9ICD,R,OF  C8MMBN26 

DIMENSION  CSMM{26),EN(3TRQ(20),ENOFUL(2O),ENQVAC(20),eNaSTT(S0> 

OIMENSIBN  ENGSTPtS0),EFFTAB(9,9,9),RAEFTB(ll,a) 

CBMMBN  C8MM,£N0TR0,ENQPUL,EN0VAC,ENGSTT,ENQSTP,EFFTAB 

-OtMENSl8N-A(10),C(lO) . . . 

CBMMBN  AaC,FUIDL,VaCIDL,N8PEED,NVEL,NTIMES,SPDINC,VELINC,TIMINC 
CBMMBN  TFT8RQ,RIEPIF,CVTTR0aISIM,TSnEW,BSNEW/T9ICDN,T91C0B 
CBMMBN  RP,RPP,FBaHP,TCVTLS,TCLULS,RPMlN,RPMAX,TT,TCiTF 
CBMMBN  RASCAL, ENT8RQ/P0RAQ,EaAIN,E0RAQ,RACFTB,RATKLS,0TF 
OIMENSIBN  ORATISUO) 

C8MM8N0RAT1B,Rm1N,RMAX,ICLUCH,CVTSCL  ■ ■ 

equivalence  (VAR(4),TVEPA0), tVAR(5),VEPA0l 

BSiO, 

ICLBCX  • ICLBKl  • ICYENO  t ISHIFT  » 0 
IBLOl  • iBLOa  • I8LD3  . 0 

“NOT  • 'NalBLO^»'NREC  • 0 ' 

TIME  • TS  » VANALa  ■ VEPAO  • VVBA  • OtO 
VVB8»0, 


CBMMBN27 

CBMMBN28 

C8MM8N29 

C6MMBN30— 

CBMM6N31 

CBMM6N32 

C8MMBN33 

CBMMBN34 

CBMMBN35 

CBMMBN3*— 


08  5 I»li8 
TIMMAX(I)  • 
5 C8NTINUE 
VAR(2)-50, 

tvepao*-delmin 


TIMLENtn  • TlMAVail)  • OtO 
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54|  RFINR»1,/R1F 

55)  PINTRO»TRQ!DL 

361  PA9N  P Ot.  • 

57)  E809TpTRBI01.»RIEINV  

9S|  ISAHQ 

69)  ISWSppI 

60(  IENSIn*! 

61)  ■ IEN3N9«1 

62)  T9IN  P T99N  • 0»0 

63) or—  i 773t0  ■ ■ ■ ■ 

66)  0F09T  p 0*0  , , . ... 

66)  " ■■  CVTTRQ  •■'TCLSB  • TCLULS-*  TCVTU8  p TLPUHP  ♦ GNU  • R • 0#0 

661  RETURN 

67)  ' ENO  " 


E-34 


• t 

li 

21 

31 

5! 

61 

71 

81 

9! 

"ior 

111 

121 

131 

161 

131 

161 

171 

181 

191 

201 

211 

‘22r 

231 
261 
25| 
261 
271 
38r 
291 
301 
311 
321 
331 
161 
351 
361 
37| 
381 
391 
‘601 
611 
621 
631 
66] 
651 
■“66  i‘ 
67| 
68| 
691 
501 
511 
“521 
53: 


••••  JPBHYB  •••• 


SUBRBUTINE  vIPBHYB 
C,...  TERMlNATlBN  SUBROUTINE 

-R»RtRA0TKE“3/S/76-  

common  RlEiTMAX/VACMAXj VVlMl* VVIUFR« VviSBR/VVliCD^VVIMi VVIIRF  COMMONOI 

COMMON  vyiM0R<VVI0RR4AYlBAAVIB,T8IlSR/AVIMiyviFUMiYVIFUS.  C0MMBN02 

COMMON  VVI6WB<VVISHiVyiAMX<VVlASiVVIlCFiTVIJCTjTVlUTB«TVlURA  C0MM0N03 

COMMON  TyiJTW«SCAUEF«DElMlN<FUELWTiTIOLE<OT  COMMON06 

COMMON  NVEPA«RIEINV>HRPSEC<MaXLIN«EPS/nGEAR< IOuTj iPRNTiUOADEO  C0MMBN05 

“OIMENSION“T8INV(11),IVEPA(3000)' , COMMON-S- 

OIMENSION  VMlN(2)<VMAX(2)<VlNTt2)iN0lM(2)  C0MMBN07 

DIMENSION  DACC0Ntl51/ADCC8N{15)“-  ' C0MM0N08- 

DIMENSION  TVICRK161  COMMON09 

COMMON  T8INV  ■ “ "COMMONIO 

COMMON  lyEPA/VMINiVMAXiVINT/NDIMiOACCONAADCCONtTVlCRL  C0MM8N11 

COMMON  TlMEiNRUN/INDIC<NREC*NFaELiICCBCK#lCL0K0iT8iB6A88HPiT0R0-  -COMMONtr- 
COMMON  8STBRO/ESD0TjPABC/RABNiPPOSiTAOC#TAON  C0MM0N13 

COMMON  tSlC/TSlN/TSDNiTSOC/TSON  ..  C0MM0N16 

common  T9I1<T9IIGR,VV05<VVOA,VYODjAVI04AVI8{TVIMU*VVDF»VVOM1#PAOFRCOMMOn15 

COMMON  FUELE/rTKYC<ICLOKliISHlFT«WHLSLP«WHLOUO.  C0MM0N16- 

COMMON  ICYENDiNUlNEi ICYClEi NQI , NGI OLD, VEPA# VANALGi PAOFRO# WOAO  C0MM0N17 

COMMON“VY0SO«DElTA,DEl.T/ISEQiIGO/ESOOTOAl8CAff COMMONtB- 

EOUIVALENCS  (OIST<VVOO)i {BSiYVIBBR)  . . C0MM0N19 

DIMENSION  FTlME(60)iESPEEO(6O)<AT0R0S(60)AYARll0l4Xt285)>NY0UTU6ICOMMON8O 

DIMENSION  VALl2)*NuT(2)*NOT(2)#IPDX(80<20»<ISPEED(20»ATlMMAX(a)  C0MM0N81 

DIMENSION  TIMLEN(5)<TIMAVQ(5)  ■ . C0MM0N22 

COMMON  V*RiXiNVOLT<VAL«NLT/NQTiIPDXj ISPEEDiTIMMAX4TlMlEN#TIMAV0  C0MM0N23 

“EQO  TVAUENCE  'I FTIME ( 1 JVX  f 6» ) ) i f E6PEE0  tn#X(l06))il ATOROS ( 1 J # X ( 166  n COMMONt*- 
COMMON  I0l.Dl4lBLD2/I0LD34lSWl,ISwe/ISW34lENGN04lENQlN  C0MM0N86 

COMMON  ElNTRQ/FINTRQ^RIF/RFlNRiDFOOTiGNU/PQNUiTROIpUiTSICO^RiOF  C0MM0N86 

DIMENSION  COMM(86)jENGTRQ(80)jENQFUL(20)/ENOVAC(2014ENQSTT(20) 

DIMENSION  ENQSTP120)4eFFTA8(9«9<9)iRAEFTB(ll4 in 

COMMON  COmm^ENQTRO/ENGFUL^ENQVAC^ENOSTT^ENQSTPjEFFTAB 

OIMENSION“A(10)/C(l0r“: . ‘ . “ - 

COMMON  AiCiFUIOLiVACIDU^NSPEEOANVEL^NTIMES^SPDICJCiVELlNCiTIMlNC 
COMMON  TFT0RQ<PIEPIF,CYTTRQ4 I51MjTSNCW48SNEW4T9ICDN4T9IC00 
COMMON  RI»jRPP4F0aHP<TCVTL8/TCLUl.S<RPMlN4RPMAX/TT*TC4TF 
■ "COMMON  RA8CAL4ENT0RO#FDRAOjEQAIN4EORAQ,RAEFTB4RATKLS4OTF 

DIMENSION  QRATlailO) 

COMMON-QRATIOiRMlN/RMAXATCLUCHiCVTSCU 

dimension  SUMJ(20) 

DIMENSION  CC(1O)4AA(10) 
common  /Sumvar/cc< AA 
COMM0N/STOPS/NST0P 

common  /EPaSH/  VCRuS4ACEt4DECELiD(3)iT10L/DD»RTLNGT 
C0MM0N/MPQ/FMP3( 151 1 CFMP ( 151iRN4CFMPQ»RWEN/RWHP 

199  FORMAT (/A20Xil3A6,/420X4l9A6i/l 

800  FORMAT!  61X,36HjOINT  PROBABILITY  DENSITY  (PER  CENT)) 

801  F0RMAT(/('439X/63HEn6INE  STEADY  STATE  TORQUE  VS,  ENGINE  SPEED) 

802  format ( 8// 1X>6HT0RQUE,66X413HSPEED  INTERVALS#/# IX# 9HI NTERVALS ) 

803  FORMAT(HO) “ 

806  FORMAT{8K#80I6) 


C0MM0N87 

C0MM0N88 

C0MM0N89 

C0MM8N3O- 

C0MM0N31 

C0MM0N38 

C0MM0N33 

C0MM0N36 

C0MMBN36 

C0MM0N36 


COMMON 


E-35 


• t 

• t 

205 

551 

206 

561 

207 

571 

] 

581 

59) 

60) 

208 

- - 611 

209 

62) 

210 

631 

‘ 2100 

66) 

2110 

651 

661 

211 

67) 

212 

68! 

213 

69! 

214 

70! 

215 

71! 

216 

72! 

217 

731 

i 

74! 

218 

“~75! 

— gjg 

761 

220 

77| 

■ 221 

78| 

222 

“ 79) 

228 

80! 

226 

81! 

“22T 

82) 

228 

83) 

230 

841 

260 

85) 

262 

86) 

300 

871 

“1000 

88) 

891 

1002 

901 

91! 

1003 

92! 

• 

931 

94) 

95) 

96! 

97) 

98! 

99) 

1001 

101] 

1021 

103) 

5 

104! 

1 /,5X#I5i36H  samples  EXCEEDEO  THE  MAXJMUM  TBRQuEi 

2 /<5X, I5437H  SAMPLES  FELL  BELBW  THE  MINIMUM  SPEED* 

3 /*5X, I5*35H  samples  EXCEEDED  THE  MAXIMUM  SPEED) 


1 F7.9*X*3HGPM) 


FORMAT! 10x*17hR8AD  LOAD  ENER3YJ* 1212H  .)*F9,2)  , 
FORMATaOX/lSHENERGY  LOST  IN  CVTI*  U (2H  -)*F9t2)  , 
FORMAT(lOX*2tHENERQY  LOST  IN  THE  CLUTCHI * X* 7 ( 2h  -)<F9*2) 
TBRMaT(10X*30HENER0Y  lost  in  excess  0RAKINSI*X«S(2H  -)iF9*2) 
F0RMATa0Xj27HENERQY  GENEBATEO  BY  ENGInEI*7(2H  .)«F9»2*X* 
18HH0RSEP0WER  SECONDS) 


•)*F9.2) 


-)*F9*2) 


I 8HN0  STOPS* 4X/6HLENGTH) 
FORMAT! 3**SHCMPH/SEC)*3X*5H(r 
1 10H!PER  MILE)*3X*7H!MILE6)) 


PRINT'300 

PRINT  199*|C0MM!I)*1*1*26) 

PRINT  200 

PRINT  SOI 
PRINT  202 
ISPEE0!t>fyMlN!8) 

TNT»VINT!21~~  - 

NL1m»nOIM!5) 

DO  5 I«2iN|,IM 

ISPEED!  I )»ISPEEO!I-l)->INT 

CONTINUE 

N2«NDIM(2),1 

PRINT-20‘)*aSPEED!I)*I»l*N2)  ' 
PRINT  20**1ISP£ED!I)*1«2*NL1M) 


E-36 


• t t 

_ 1071 
1081 
109) 

not 

lilt 

1121 

113) 

ll<t) 

115) 

116) 
117) 
US) 

119) 

120) 
1211 
122J' 
123) 
126) 

125) 

126) 

127) 

128) 
129) 
130{ 
131) 
1321 
133) 

“136)  ■ 
135i 
136) 
1371 
1381 
139) 

■■  1601“ 
161) 
1621 
163) 

“ 166) 
165) 
“166) 
1671 
168) 
169) 

' 1501 
151) 
“1521“ 
153) 
1561 

155) 

156) 

157) 

““1581“ 

159) 


PRINT  203 
IT8R01*vPIN(1> 

INT*VINT(1) 

' Nl*NDIMU).f”  ■ ■“ 

09  10 

10  SUMJ(I)«0 

06  20  1«Un1 

IT9RQ2»IT9RQ1+INT“ 

09  15  JU/N2 

““  ■■“X(J1.R.9AT(IPDX«Ujn*100i/rL8ATUCYCLE) 
SUMJ(J)nSUMJ(J)*XI J) 

15  CONTINUE  - - - 

PRINT  206,  jT9R01UT9RQ2<  (X(J)#J#UN2) 
IT6R01»IT9RQ2  ' 

20  CONTINUE 

“ PRINT' 206  “ 

PRINT  203 

PRINT  209, (8UMJ{J),J»1,N21 

PRINT  300 

PRINT  203 

PRINT  208, iCYCLI 

-PRINT'212  , 

PRINT  207,(NUT(I),NGT(I),I«1,2) 

PRINT  203'  ■ 

PRINT  230,VVIM 

* compute  actual  PLYWHEEL  inertia  in  L5*FT*FT 

RI  • RIF«32«176«60i0/|6«28318*26«0) 

PRTN'r26?,Rr ‘ 

print  2o3 

“PRINT  211, vveo  ' 

PRINT  1000 
PRINT  1002 

PRINT  1003,ACEL,VCRUS,OECELiTIOL,NSTOP,RTUNQT 

PRINr-203 

PRINT  210 

PRINT  81P0 - 

• 

• OUTPUT  Fuel  consumption  ■ 


~“‘00~25"N' 

VN  I N 

IF(N  •CO*  RN)  VN  ■ WOO 

PRINT  81l0,VN,FMP3{N),1.0/FMPS(N),CFMP(N>U.0/CFMP(N) 
25  CONTINUE '“ 

PRINT“203 “ ' 

ELEFT  • C>F#DP(*RIF/l0506t0 
EFR1C»C(I)-C(6). CLEFT 
ELENlN»EFRICfC(9) 

PRINT  217, C(l) 

C(6)«C(6)*CC(6) 

PRINT  220, C(67  “ 

PRINT  260,CC(61 
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1601  PRINT  218, cleft 

Uli  PRINT  203  • 

1621  PRINT  2l3,C(2) 

1631  ■■  PRINT  203 

1661  PRINT  216,0(5) 

1651  PRINT  $21,C(T) 

1661  PRINT  216,0(3) 

167)  PRINT  S28<CC(2) 

168)  PRINT  227,00(1) 

1691  PRINT' 215,0(4)' 

1701  PRINT  226,0(10) 

1711  " PRINT  219,0(9) 

1721  PRINT  225,ElENIN 

1731  PRINT  222,0(8) 

1761  PRINT  300 

'1761  RETURN" 

1761  END 


• ••#•• 

JJ  • *•**  M6NKEY  •••• 

2|  SUBROUTINE •M9NKEYlT<SiRjRMIN*RMAX#STAR»Tt8S) 

3|  C»**»»T9H  HAUSENBAUER  5/1975 

AJ DIriENSiBN  STAR(9/7i9) “ 

31  DIMENSION  TUT(2)iTS(2) 


61 

71 

8t 

91 

11 

TAiABStTl 

IF(TA.260  liai*12 

io»i  ■■  

TMD»0. 

lo; 

lit 

TP0*26« 
QO  TS  20 

12T 

12' 

IF  CTA-50.r  13<1J#16 

131 

13 

ID»2 

161' 

15) 

"TM0"23* ‘ 

TPO»50t 

161  SO^TO  20 

171  16  IF  (TA-lOOtl  15#15,16 

181  18'  ID«3 

191  TM0*50* 

■ 201  TPD»lOOr 

211  Q9  TO  20 


— 22, 

23) 

26) 

25) 

26) 
27) 

16  I0»6  ' 

TMD»100» 

TP0«200r 

20  continue 

IF  (T)  25,81<21  ■ 

21  I»ID*6 



2or 

~ TM6TMD 

29| 

TP»TPD 

■"  30) 

■Q9  TO  30  ~ 

31) 

23  I«3«ID 

32t 

TM»»TPD" 

33) 

TP»-TMD 

361 30~'CONTlNUr 


35 1 

1PP»I*1 

36) 

J*l*IS/600i ) 

37) 

• 

38) 

IFfJ  # 1)  j • 1 

39) 

--  60) 

■#  ' 

61) 

SP«600«»J 

621 

SM«SP>600« 

63) 

RlNT»(RMAX.RMIN)/8t 

66) 

Kt< (R.RM1N)/RINT)*1 

65) 

• 

66) 

“IF(R  4 RHIN)  K * 1 

67) 

1F(R  » RPAX)  K • 8 

68) 

• 

A9) 

RP»(K»RINT)*RMIN 

50) 

RM»RP.RINT 

51) 

DO  66  UL»1<2 

52) 

L«K*LL*1  

53) 

DO  65  MM»l/2 
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54| 
“ 55| 
561 
- 57| 

58) 
591 
601 


TLT(^^H)  • rfTAR(I«M,L)  ♦ ( T»TM  ) •(STAR  < IPP#  M«U  ) -STAR  (1*  M<L  ))/ (TP-TM) 

A6  continue 

66~T5(LL)  «TI.Ta)  * lS.SM)«(TU(Z)»TLT(m/(8P«SM)  _ 

TIBS  ■ T8(n  • (R«RM)#(T8(B)-TS(1) >/(RP«RM) 

RETURN  ■ ^ 

END 


U 

_ 2, 
31 

A| 

5| 

61 

71 

81 

91 

101 

11) 

12) 

13) 

16) 

15| 

161 

171 

18) 

I9l 

20) 

211 


• • 

• • •***  NUTRAl  •♦•• 

subroutine  NUTRAL(RASjRAR/CVTR«TAXLE) 

C«**«»TOM  HAUSENBAUER  9/1973 

C«»»»»SUaROUTlNE"TO"CAi;CULATE  TORQUE  IN  REAR  AXLE  DUE  TO  DRIVETRAIN  ‘ 
C SPIN  LOSSES  WITH  TRANSMISSION  IN  NEUTRAL 

• QBTLS  • Ot 

• CVTTLS  • 2«  

• TT  • 0BTL8  * CVTTLS 

•  If  {CVTR)’10j5<10 

• 5 TD3T  . 0» 

• - QO  TO  15' 

• 10  TOST  • TT/CVTR 

• 15  RATLS  • 2i 

•  TAXLE  » »RAR«(TPST*RATLS) 

TDST  • 0*0 

IP(CVTR'»NEt  0.0)  TDST  • 8.0/CVTR 

TAXLE  • ■RAR'ITOST  * 8.0) 

RETURN' 

END 
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••••  9TPTH0  •••• 


aj  suBRBuTinE  sf^Twe 

31  C---T  SUBRBuTlNC  T9  9uTPuT  HYBRID  SYSTEM  VARIABLES 

4|  C*— • R»R*RAOT<r  r/30/7B- — - 

51  # It  EEB  1977 

6]  ■ C9MMBN  RlEiTMAXiVACMAXiVVlMliVVlLFR^VViaBR/VVliCD/yVlM^VVllRF  C9MM9N0r 

71  CBMM8N  VVlM0RiVV:0RR*AVlB#AVIR4T8JlGR/AVIM/yVlFUM4¥VIFUS  CBMM9N0E 

St  C9MMBN  VV1SH3*VVISH/VVIAMX/VVIAS<VVUCFiTVIjCTjTv:jTR»TVIJRA  CaMM9N03' 

9i  C9MMBN  TYIjTW#SCALEF/DELMlN/FUELWT<TlDLEiOT  CBMMBN04 

10}  C9MM9N  NVEPA/RIEINV/HRPSECjMAXL:NjEPS,NGEAR, IBUTi IPRNT<LBADE0  ' C9MMBN0S 

111  DIMENSIBN  TSINVlll)/ IVEPA(3000)  CBMM8N  6 

lEl  ““  ■'  OIMENSIBCI  VMIN(2),VMAX(21/VINTC2)/N0IM(2)  CBMM9N07- 

131  OlMENSlBti  DACCBN(15)<A0CC0N(16)  CBMM9N08 

14|  " DIMENSIBN  TVICRU16)  ’ CBMMBNOJ- 

15}  CBMMBN  TSINV  CBMMBNIO 

16}  CBMM9N  lVEPA/VMIN,VMAX*VINT/NDIMiDACC6N<A0CCBN«TVICRL  CBMMBNlt 

17|  CBMMBn  TiMEiNRUNi lNOICiNREC»NFuEL» ICLBCKi IClBK0»TS<BS<9BHP«T8R0  CBMMBN12 

181  ‘ ‘ CBMMBN  SST8RQ/ESD6T<PAflC/8ABN/PP8B<TA9CiTABN  CBMMBN13 

191  CBMMBN  T9IC/T91N/T80N<T9BC/T9BN  CBMMBM* 

20)  CBMMBn  T9ll,T9llQR,VV85<VVBA/VYBD<AVl9|AVlSiTYIMj<VVDF<VVDMl#RAeFRC9MM6N15- 

211  CBMMBN  FUELE^ltlCYCilCLBKl/ISHlFTiHHLSlP/HHtBLO  CBMM9N16 

22}  CBMMBN"ICYEND/NLlNEi ICYCLE* NOI j NQI BLD< VEPAi VANALB# PABFRO* VVBAO  CBMMBN17 

231  CBMMBN  VVBSOiDELTAiOELT/ISEOiiaB/ESOBTOilOEAR  C9MMBN18 

2M  " EQUIVALENCE  1 01  ST< WBD 1 < t B5< VVI6BR ) _ CBMMBNir 

251  DIMENSIBN  FT IME ( 60 ) i ESPEED ( 60 ) * AT9RQS ( 60 ) # VAR t lOli X { 223 1 » NV9LT t 15 1 CBMMBN2Q 

26}  DIMENSIBN  VAL:2)<NLT(2)*N8T(2)<lPD*t20#20)/lSPEED(20)<TIMMAX(5)  CBMMBNEl" 

27}  DIMENSIBN  T1MLEN(5)»TIMAyQ(S)  C8MMBN22 

281 CBMMBN  V*RiX.NVBLT4VAL*NL7/NQT#IPDX<ISPEEDiTIMMAX4TIMUENiTlMAVQ‘“  C9MM9NB3 

291  equivalence  (FT!ME(l)iX(46) )< (ESPEE0(11«X(106) )« (ATeRG8(l)iX(166nCBMMBN24 

301  " ^^CBMMBN’ lOLDl/I8L02<I6LD3iISWljISH2ilSW3#lENGN6<!EN3IN  C9MM9N25- 

311  CBMMBn  ElNTRQ/FlNTRQ*RIF,RFlNR#DFOBT/QNU#PQNU«TR010LiT9ICD,R»0F  CBMMBN26 

321  “■  DIMENSIBN  C9MM(26)4ENGTRQt20)iENQFULt2Q)iENOVAC.(20l«CN08TT(20)  CBMMBN27- 

331  DIMENSIBN  ENQSTP(20)#EFFTABt9i9/9)<RAEFT8ttlill)  CBMMBN28 

3A|— CBMMBN -CBHM#ENQTR0<ENGFUL*'ENQVAC*ENQ8TT#ENa8TP<EFFTA8  ^ ’ C9MM9N8J 

351  DIMENSIBN  A(10)»Ctl0)  . . CBMM8N3Q 

361  CBMMBN  AiCiFUI0L4VACIDL<NSPEE0iNVEL«NTIME8iSPDIUC#VELlNC<TlMlNC  C9MMBN3r 

371  CBMMBn  TFT9R0<RIEP1P<CYTT8Q< I81M<TSNEw«BSNEh#TSICDN«T9ICD9  C8MMBN32 

381  ■■■  CBMMBn  RP<RPP<FBBHP<TCVTLS<TCLULSiRPMlN<RPMAX<TT<TC<TF  CBMM9N33 

39!  CBMMBn  RASCAL<ENTBR0<FORAa<EQAIN<E0RAQ,RAEFTB<RATKLS<DTF  CBMM9N34 

60} DIMENSIBN  QRATIB(IO)  ' CBMMBN95 

All  CBMMBN  QRAT19<RMINiRMAX<lCLUCH<CVTSCL  C8MM9N36 

621  CBMMBNXFUEL/'PMPGC  ' 

631  CBMMBN/MP3/FMP9( 16) <CFMP (15) <RN<CFMPQ<RWEN<RWHP 

661  C6MMBN/E(?A6H/0UM(8)<RTLNQT"  - 

65l  * 

66)  9CrFBRMATTl^jl<20X<13A6<V<2lX<l3A6)  . ^ 

671  102  F8RMAT(/l9X<6(H>)<7HVEHlCLE<8(H*)<2X<6(H>)<6)^ENQINE<6tHf  )<X<2H*«< 

681  1 ■6HFUEL<0-<2X<6HACCUMU<X<5HC9RR»<X<6tH-)<8HFLYHHEEL<8(H-)<X< 

691  2 6h*REAR><2X<13h«0R1VE  TrA) N.< X< 2hQE< X< 2HBR ) 

50}  ' 103  F9RMAT(3X<6HTIME<2X<5HDIST<<2X<5HSPEE0<3X<6HACCEL»<2X<SHSPEED<X< 

511  1 6HTBRQUE<X<5HP9WER<X<7HINSTANT<2X<6HLATIVE<X<5HECTED<X<5HSPEE0<X< 

”32 1 2^6HTBRQUE<  X<  6HBUTPUT<  X<  6HWHEELS<  6X<  2HTR<  3X>  2HRA<  2X<  2HMB<X<2HAR< 

53}  3 X<2HAK) 


3*1  104  FORMAT ( 5H ( SEC )< 2Xi*H( Ml )«3X;5H(MPH),Xi9H(MPM/seC)<X»5H(RPM),X# 

55|  "‘I  6H(FTLBI^2X<4M(HP)/X<7H(t0/HH)i3X<5H(MPQ»*Xi5HiMP(5)«Xi5HtRPM|,XA 

361  3 6H(FTtS)i2X<4H(HP)<3Xi4H(HP)i3X*6HEFF,,X<4HEFFi,gX<2HDEj4K<2HE») 

571 I05'"F0RMATCX*F6.1/F7.3,F7.2>F»i3iI7«F7.1<F6.X*F8.!»F8.2Ar6t8«  UjF7tir 

5S|  1 2F7il4F6il«F5il<!3«l6<  X«Al 

591  • 

601  • IF  BRAKE  ARPUlEOi  SUTRUT  tCTTCR  S> 

611  IB  • 4H  

621  IF<BS  » 0«0)  IB  ■ «HB 

'63r»  ■ . "■  ‘ ■'  

64)  R^EN  • >9eN*T9aN«TVlJTtf/.3227396«0 

651  <r  3827396.0  • 2«33000«60»32.l74^t8*PI  • a»Rl) 

661  RWHP  • T90C*T9BN/5252.0 

67|  • 

681  TBDlEF«lOOi*ONU 

691  T901»l00i»T911 

701  F08HP»»TFT9RQ*DP/32B2. 

■ ■ "711  RIENO.ICNQIN  ’ - - . 

721  FMPOC»0.0 

731  IF(FUELE)4<4*3  " " 

741  3 FMPQCiVVeO#FUEI.HT/PUEl.E 

7Si 4~C9NTTN0E 

761  ELEPT  « OF#OF*RIF/10S04.0 

771  CFMPQ  • FMPOC*C{l)/(C{l>»ELErT) 

78:  IF(CFmPO  4 0.0)  cfmpq  •, 0.0 

---  ■ IP.(CFMPQ  p 30.0)  CFMPO  • SO.O 

80i  • 

811 irrwB0~|  RKf)— 

82t  1 FMPQ(RN)  f FMPflCl 

' 831  2 CFMP(RN)  .4  CFHPai 

841  3 RN  • RN  « liO 

851  • ' _ _ 

861  IPilCYEND  fe  0) 

8T1 1 “FMPQ I RNn "f MPQCJ 

881  8 CFMP(RN)  ■ CFMPO 

891  • ■■ 

901  NUlNEtNLlNE*! 

911 IF«NtINE»MAXUINl20.a0iS  - ‘‘ 

92|  B CONTINUE 

931 ~ PRiNr-9oitcomrn/mi86) -> 

941  F«INT  102 

95:  ■ — PRINT  103  

961  PRINT  104 

97:  NUlNEtl  ■■  ■ ■■  " ■ 

98|  80  continue  . . 

99)  PRINr~105iTIME.VV0DjVV0SiVV8A.PA0N<SSTeR0A8BHP.eA8FR«rMPQC> 

lOO:  1 CFMP0/0F«TPT0RQ«FeBHPiRNMP«TBDlEr.T901«IEN01NiISEAR«lB 

ion"  ■ RETURN  " 

102: ENO_ _ 
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• • • t 

II 

” 21 

31 

^ 41 

51 

tt 

71 

_ _ 

91 

lor 

111 

121 

IS] 

141 

I5i 

141 

17| 

18| 

191 

201 

211 

22| 

23l 

241 

251 

261 

271 

28  r 

291 
301 
311 
321 
331 
■ ■■  34 1’ 
351 
361 
371 
“ 381 
391 

401" 

411 
42] 
431 
■ 441 

45| 
46T 
471 
481 
491 

~ 501 

511 

521" 

531 


••••  BTVRHB 

SUBRBUTIME  BTVRHB 

— SU0R9UT1NE  T9  9UTPUT  HYBRID  VARIABLES 

.••"H4R.RA0TKE  1/30/75 - - 

1/1/77  L*  89MERS.  

COMMON  RlEiTMAX,VACMAX|VVlMl»VVILFB/Vvi2BR/VVllC0>yVlM«VVliRF  COMMBNOl"- 

COMMON  VVlMDR<VVlORR«AVlB|AVlRjT8115R<AVIMiVVlFUtfiVVlFUS  COMMBNOa 

COMMON"  VVTS4B#  WISH*  VVTAMXiVVIAS/VVUCFiTVIJCTiTV  I JTR«TVtJRA COMM0N03 — 

common  TVJjTW«SCALEF/DElMlN<FUELWT«TlOuEiOT  C0MM0N04 

■ "COMMON  NyEPA<RIEINV/HRPSEC<MAXLlN,EPS/NQEAR, lOUTjiPRNTiLOAOEO  COMMBNOr"" 

DIMENSION  T81NV(11)< !VEPAt3O00)  COMMON  6 

OtMENSlOtJ  VMlN(2)/VMAX(21iVlNT.(2)«N0lM(2)  C0MM0N07“- 

dimension  DACCBN(15)iA0CC0NllB)  CBMMBNOS 

OIMENSlON'TVrCRLIlA) COMMON09 — 

COMMON  T8INV  COMMONIO 

"COMMON  iyEPA/VMIN<VMAX«VINTiNDIM«DACCONlAOCCON4TvicRL  CBMMONll  " 

COMMON  TlMEiNRUNilNDIC<NREC<NFUEL#ICLOCK< IClOKOjTS/BS^OBHP/TORQ  C0MM0N12 

■  COMMON  S8TBRO<tSDBT#PABCiPABN/PPOBiTAOC<7AON  " CBMMONtr" 

COMMON  T9IC#T9IN#T80N,T90C/T90N  C0MMON14 

CBMMON'T9U<T9IlQRiVVBSiVVOA,VyQD#AVlO4AVlS4TyiMjiW0F/VVDMljPAOFRCOMMOinB — 
COMMON  FUELE4lTICYC»ICL0Kl4lSHlFTiWHLSLP<WHL0L0.  CBMM0N16 

COMMON "ICYEND4NLINE4 ICYCtEiNOIjNOlOLD^yEPAiVANALGiPAOFROiVVOAO  C0MM0N17 — 

COMMON  VVOSOiDELTA/DELT^ISEQiIOOiESOOTOilSEAR  COMMONIO 

'■  EQUIVALENCE  (DIST^yvOOli  (BSaWIBBR)  ...  . COMMONI9- 

DIMENSION  FTIME(60)/ESPEED(60j4AT9RBS(40)4yAR(10)4X(2261/NV0LT(15)C0MMaN20 
D:MENSl01irvAL(8)4NLT(2)4NQT(2)4lPDX(20i20»4lSPEEO(20)4TlMMAXt5)-"CBMMBN21 — 
dimension  TIMLEN(5)4TIMAyQ(5)  C0MM0N22 

COMMON  VHRiX/NVOLT/VAL^NLT/NQTilPDX^ISPEEO/TlMMAXiTlMLCN^TIMAVQ  C0MM0N33  “ 

"EQUIVALENCE  (FTIMEi l)iX(46 >)< (ESPEEDIDaX ( 1061)4 iATBRQSl 1 )iX( 144) IC0MM0N84  ~ 


"COMMON" I0LD1a19LD24 I 0LD34lSWl4lSWe4lSW34lENQN64lEyQIN  COMMON85" 

COMMON  E1NTRQ4FINTR04RIF4RF1NR4DFOOT4GNU4FQNU4TR01PL4T91CD4R4DF  C0MM0N26 

DIMENSION  COMM(26l4ENGTRQ(20)4ENGFULI20)4EN6VAC,(20)4ENQSTTl20)  C0MM0N27 

dimension  ENGSTP(20)4EFFTAB(94949)4RAEFTB(ll4ll)  COMMON28 

COMMON  ceMM4ENOTRO4ENQFULAENQVAC4ENG8TT4ENQSTP4EFFTA0  C0MM0N29 

DIMENSION  A(10)4Ctl0)  . _ - COMMON30 

COMMON" AaC4FUI0L4 VaCIDLa NSPEEO4NVEL4 NTIMCS4SPDINC4 VEL I NC4TIMINC-  COMMONSJ- 

COMMOn  TFT0R04RIEPiF4CVTTRQj 1SIM4TSNEW4BSNEw4T9ICDN4T9ICD0  C0MM0N32 

COMMON  RP4RPP4F08HP4TCVTLS4TCLULS4RPMIN4RPMAX4TT4TCaT^  C0MM0N33 

COMMON  RASCAL4ENT0R04FDRAa4EQAIN4£DRAQ,RAEFTB4RATXL64DTF  C0MM0N34 

DIMENSION  QRATIO(IO)  C0MM0N35' 

common  QRATIO4RMIN4RMAX4 ICLUCH4CVTSCL  C0MM0N36 

-DIMENSION  B(25) 

EQUIVALENCE  OtDiXd)) 

"COMMBN/FUEl/FMPGC 
DIMENSION  CC(10)4AA(10) 

"COMMON  /SUMVAR/CC4AA  , COMMON 

C0MM0N/MP0/FMPGg5)4CFMP(lB)4RN4CFMPG4RWEN4RWHP  

PULSE  • QtO 


E-43 


* * 541  * * irUENOIN  .EQ>  2)  PULSE  • 1*0 

“ 651  • 

56|  QPn  • 0*0 

'571 irtrupBC  k o«0)-T3PM  • T'O/^Mpac 

681  • CSRRECTECi  HRa 

■ ■■  551  C3PM  • 0«0 

601  IP(CFhPQ  » 0«0)  CQPM  • UO/CFMPQ 

■ - 611  • ~ : ■ 

62]  S(  1)  • TIME 

63{”*^"VEHICCE'0*T* 

641  8(  2)  • VV8D 

651  B(  3)  ■ yVB8 

661  6(  4)  • VV8A 

671  # ■ ENQINE  data  ‘ - 

681  B(  5)  ■ PABN 

691  Br6)'  •'  RA8C  " ' 

701  0(  7)  • 80HP 

711  • FLYWHEEL  DATA  ' ^ 

721  81  8)  • DP 

“ “"“731 BT  5)  • TFT8R0  ■“ 

741  BUO)  • F8BHP 


75r”4  - 

761 

8(11)  « VCPA 

771 

- B(121  • VVOF  

78)  • 

REAR  WHEEL  data 

791 

B(13)  * RWHP 

801 

8(14)  « RWEN 

"8ir* 

■ ENGINE  BN/BFr  PULSE 

821 

8.(15)  • Pulse 

831  • 

FUEL  DATA  " 

841 

8(16)  » FhpQC 

851 

8(17)  • gPM 

861 

8(18)  • CFmPQ 

871 ~BU9)  i“COPM“ 

881  8(20)  • RA8FR 


" 891  • 

901  B(21)  • CC16) 

■" 911  8(22)  • T»IN" 

921  • 

— 931  4"  UNUSED -locations — — : 

94|  8(23)  • 8(84)  • 8(25)  • OiO 

95|  • 

961  WRITE(U)  8 

" 971  ♦ 

981  RETURN 

991 END 
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II  • 

2t 

31  C'- 
■ *I  C»* 
51 
( i 
71 
8| 

91 

101 

at 

12: 

13; 

141  ■■■■■ 

151 

16: 

iri 

i8i 

19: 

201  ■■■ 

eij. 

221 
231 
241 
251 
261  " 
271 

"28  j — 
29) 

301 

311 

32J  - 

331 

"341 

351 

361 

371 

381 

391 

■401 

41:  c»< 
421 
43| 


••••  PRBDHB  •••• 

SUBRBuTlNE  PRBOhB 

SUBR9UTIbl5  t6  CALCULATE  THE  JBlNT  PR8BABIL1TY  DENSITY  9F  TwB  VARIABLES 

OAN  KAPELLEN  2/74“‘  ‘ - ' 

CBMMBN  RIE/THAX, VACMAXiWlMli VVlLFRAVviESRAVVliCDiyVlMiVVIlRF 
C9MMBN  VVIMDRaVVIDRR,AVIBaAVI8«T8IISR/AV1M#VVIFUI'iYVIFUS 
CBMMBN  WISWBi VVISHiVVIAMXi VVIABa WIlCFi TVIJCTjTVI JTR#TVI JRA 
C9MM8N  TVIjTW,SCALEF,DELM1NaFUELWTiTIDLEjOT 

CBMMBN  NVEPA^RIElNVAHRPSEC/MAXLlNiEPSiNQEAR, I8uT< IPRNT#ueADEQ 

"DIPENSIBN-  T8INVai)AlVEPAf300Q) " — 

OIMENSleS  VMIN(E)<VMAX(2)aVINT(2)«N0IM(2) 

OIMENSIBN  DACCBN(15),ADCCSH(1B)  ■ 

OIMENSIBN  TVICRL(16) 

CBfIMBN  TIINV  - - 

C8MMBN  IVCPAi VMIN#VMAXi VINT<N0IM<D4CCBNiA0Cg8NiTVICRL 
C8MM8N  TlME/NRUN/lNDICANRtCANFUEL#rCL8CK» :CLBK0jTS<88<BBHP/T8R0 
C9MM9N  SSTBRQ<ESD8TiPABC»PaBn<PP8BjTABCaTA8n 
CBMHBn  T9ICAT9lNiT80N/T96CjT9eN  . . 

CBMMBN  T9I:,T9IiaR>VV8SAVVeA«Vy80/AVI8|AVlS|T¥IHjiVVDFjVVDhlAPA9FRCBMMBMS 

■ CBMMBN  FUELE<ITICVCAlCL9Kl<ISHIPTiHHLSLP<WHLeL0  . CBMHBN16 

CBMMBN  ICYEN0»NLINE< ICYCLEiNGIiNGlBLDj VEPA^YANALSiPABFROAVVBAO  CBMHBN17 

“CBriMBN  ‘VyBSOjOELTA4DELT#"ISEOjI09*ESDSTOArOEAR  " CBMHBNir 

EQUIVALENCE  ( D I STi VV80 ) a ( BB/ VV I8BR ) CBMM9N19 

OIPENSIBN  FTIME(60)jESPEED(60)<ATBROS(40)AV4R(lOlAX{22SliNYeLTlI6)C8MHBNao 
OIIIENSIBN  vAL(2)aNlT(2)aNQT(2)aIRDX(20a20Ia18PEED(20)aTIMMAX(S)  C9MMBN21 
OIMENSIBN  TIMLEN(5)iTIMAV6{5)  ‘ , . . CBMMBN22 

CBMMBN  VAR,XiNV8LTAVALiNLTAN3TjIPDXA  ISPEE04TIM(1AX4TIMLENATlMAya  CBMM8N23 
'EQ0IVALENCE"f7’TlME(l)4X14|)  )4  rESPEE01l)4XI106n4  iAT8RQS(l)4Xtl66):C8MMBN24 
CBMMBN  lBLDl4lBLD24ieL034lSWl4lSW24lSH34lENQNB4lENQIN  CBMMBN2S 

■ CBMMBN  E1NTRQ4FINTR04RIF4RF1NR4DFDBT4QNU4FQnU4TROI0L4T9ICD4R40F  CBMMBN26 
OIMENSIBN  C8MM{a6),ENGTRQ(20)4ENGFUL(20)4ENCyAC120l4ENQ8TT(20l 
OIMENSIBN  ENGSTP(20>4EFF'rABI94  949)4RAEFTB(ll4ll) 

CBMMBn  CBMM4ENQTR04ENGFUL4ENQVAC4EN0STT4ENQSTP4EFFTAB 

-DIMENSI9N-AC10)4C(10) 


CBMMBNOl 

CBMMBN02- 

CBMMBN03 

CBMMBN04* 

CBMMBNOB 

CBMMBN -J- 

CBMMBN07 

CBMMBN08' 

CBMMBN09 

cbmmbnio 

CBMMBNII 

CBMMBNir' 

CBMMSN13 

CBMMBNU" 


CBMMBn  AiC4FUI0L4yACIDL4NSPEE04NyEL4NTIMES4SPDINC4VELlNC4TIMlNC 
■‘CBMMBN  TFTBRQ4RIEPlF,cyTTSQ< I5IM4TSNEW4BSNEW4T9ICDN4T9IC08 
CBMMBn  RP4RPP4FBBHP4TCVTlS4TCLULS4F!PMin4RPMaX4TT4TCi''’F 
■ CBMMBn  RASCAL4ENTBR04FDRA04EQAIN4EDRAQ,RAEPTB4RATKLS4DTF 
DIMENSIBN  QRATIB(IO) 

■■  ‘CBMMBN  GRATIB4RMIN/RMAX4  ICLUCH4CVTSCL 

• this  SUBRBUTINE  CALCULATES  THE  JBlNT  PRBBABlLlTY  DENSITY  BF  TWB 

• SPECIFIED  FUNCTIBNS  DURING  THE  DRIVING  CYCLE#  THE  RRBGRAM 
■44!  C---T  VARIABLES  ARE  AS  FBLLBJSa 

A9i  c---* ..-.-INPUT  variables 

“44:  c4..‘*“VALrv).T«»cuRRENr  value  bf-first^specifieo  varuble#  

471  VAL(2).f. current  vAlUE  bF  SECBND  SPECIFIED  VARIABLE# 

8UPUT  variables- 


CBMM8N27 

CBMMBN28 

C8MMBN29 

CBMMBNSiJ- 

CBMMBN31 

CBMM9N32 

CBMMBN33 

CBMM9N34 

CBMM8N35 

C9KMBNJ4- 


481 

491 


501  C.' 
511  C.' 


“52: 

531 


• NLTt I)...NgMBER  BF  SAMPLES  BELBW  SPECIFIED  MINIMUM  F8R  EACH  VARIAlLE# 

. NGT( I )... NUMBER  BF  SAMPLES  ABBVE  SPECIFIED  MAXIMUM  FAR  EACH  VARIAILI* 

. IPOXtlAj!. INTEGER  TABLE  BF  PR86ABILITY  DENSI TY . DI STRIBUT I 9N.  

A--.. .-..-BTHER  ‘PRBGRAM  'VARIABlES 

. VMINt I )..8PECIEFIED  MINIMUM  FBR  EACH  VARIABLE# 


E-45 


541  C--—  VMAX(I).«BPECIFIED  MAXIMUM  F8R  EACH  VARIaBLEi  ... 

551  C — T VlNT(I».«5PeCIFI£0  INTERVAL  LENQTH  F9R  EACH  VARIABLE* 

5(1  c*— * INTI— --Table  index  fbr  first  variable. 

■srrc-»-f  INT2— -Table  index  fbr  ^secono  variable* 

58|  c— T-  the  JBJNT  PR9BA0ILITY  DENSITY  IS  DETERMINED  AS  A PERCENTA3E  AT  THE 
591  C— end  BF  the  cycle  IN  JPBHYB* 

60S  • 

611  • determine  RAN0E  9F  VALUES.  ' 

621  IFIVALID  *LT*  VMInID)  NLT(1)  » NLTIl)  t 1 

“631 IFIVAtin  |3T*  VMAXdir  NOTIXJ  f NOTtlJ  ♦ 1 

6AS  IF(VAL(2)  »LT*  VMlNiZn  NLT(2)  * NLT12)  ♦ Ij  RETURN 

- 66t IF(VALj81  *QT*  VMAXtfi))  N3T(2)  • n9T(2)  ♦ IS  RETURN 

661  • ... 

671  C-— • determine  the  TABLE  INDICES  FOR  EACH  9f  THE  VARIABLES  AS  DETERMINED 

681  C— • BY  THE  interval  IN  WHICH  THE  VALUES  FALL* 

691  ~~INTl»(VAL(l)«VMIN(l))/VINTm*l* 

70S  INTa»tVAL(8)*VMIN(2) )/VInT(2)a1i 

711  C— • update  THE' PROPER  ARRAY  ELMENT' IN  THE  TABLE. 

721  lPDX(INTt4iNT2>«IP0X(lNTl«INT8)6l 

“731 RETURN“^ ■ ■■  ■ 

74S  end 
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II 

21 

31 

-in 

51 

61 

71 

"81 

91 

“lor 
11] 
121 
131 
■■  161 
151 
“16J 
171 
18| 
191 
201 
211 
22r 

231 
26)  ■ 
251 
261 
271 
-^28)- 
29] 
301 
311 
32] 
331 
"36]- 
35! 

36] 

37] 

381 

39] 

-60J- 

611 

62] 

6I| 

66! 

65! 

■“66r 

671 

68} 

69l 

50] 

51! 

52! 
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SUBRSUTINe  PRINTV 
MS0I7IE0  2 NBV  1976 


••••  PRINTV  •*** 


COMMON  RU/TMA»,VACMAXiVVlMliVVlLFRiVVI2eR<VVIlCDiyVIM«VVllRr  COMMONOl 

COMMON  VVIMDR<VV:0RR/AVlB/AVI8«T8I16R<AVlMiVv:FUB*yVlFU8  C0MMBNQ2- 

COMMON  VVI3wB<VVISH»VVIAMXiVVlAS»VVllCE<TVljCTjTVlJTR<TVlJRA  C6MM0N03 

COMMON  TyiJTWjSCALEF/DELMlNiFUELWTiTlDLEiOr  'COMMBNOA- 

COMMON  NVEPA<RIEINV/HRPSEC»MAXU1N,EPS/NQEAR, I0UT<IPRNT<L0ADE0  COMMONOB 

"DIHENSION  TSINVdDj  IVEPAISOOO) COMMBN-*- 

OIMENSION  VMIN(2)/VMAX(2)#VINT(2I«N0IM(2)  C0MM0N07 

DIMENSION  DACC8N(15)/ADCCBN(151-  COMMONOS' 

OIMENSION  TVtCRLU6)  COMMON09 

■COMMON  TSINV  . . C0MM9N10- 

COMMON  iyEPA/VMlN/VMAX<VINT/NDIM<OACCON*AOCCON4TVlCRl  COMMONU 

-COMMON  T1ME4NRUN>INDICjNREC#NFUEL4ICL0CK41Cl0K0jT8#BS4OBHP4TOR8  -COMMONtr- 

COMMON  SSTORQ/ESOOTiPAOC^PAON^PPOBiTAOCiTAON  COMMON!! 

-COMMON' T9IC4T9IN4T80N/T90C4T98N  . COMMONl*- 

COMMON  TBIliTBIlGR/VVBg/VVBA^VyODiAVlOjAVlB^TVIMj^VVDF/VVDMl/PAOFRCOMMBNlB 
■ COMMON  FUELEjITICYC4lCtBKl4lSMIFTiWHU6tP«WML0L0  - 'COMMONIO- 

COMMON  ICYENOiNlINEj I CYCL£< NQI 4 NGIOLOj VEPAi yANALQi PAOFRO» WO AO  C0MM0N17 

“COMMON  VVBSOiOELTAiDELT^ISEOiIGO/ESOOTO^IOEAR-  COMMONt«- 

EOUlVALEtJCE  ( DIST4  WOO ) 4 ( BS#  VV I0BR ) . COMMONIS 

DIMENSION  FTIME(60)4ESPEED(60)4ATBR8S|60)AV4R(10l4X(22S)4NVeLT(l6)COMMON20 
DIMENSION  VAL(2)4NuT(2)4NQT(2)4 IPDX(20420)4l8PEED(20)4TIMMAX(51  C0MM0N21 
--DIMENSION  TIMLEN(5)4TIMAyO(6)  ' C0MM0N82 

COMMON  V*R4X4NV0LT4VAU4NLT4NGT4IP0X4 I8PEEO4TIMMAX4TIMLEN4IIMAVO  C0MMBN23 
“EOOrVALENCe  trTIMEU)4X(46)  >4  (ESPEEO 1 1)4X1 106))i  (ATOROS(n4Xtl66»>COMMON2ir 
COMMON  IOLD14IOID24 101034 1SW14ISW24ISW34IEN0NB4IENQ1N  C0MM0N2B 

COMMON  EInTRQ4F1NTR04RIF4RFINR4DFD0T4QNU4^QnU4TR0IDL4T91CD4R4DF  C0MM0N26 


DIMENSION  COMM(26)4EN3TRQ(20)4ENQFUL(20)4ENGVAC.(20)4ENQ6TT(20) 
DIMENSION  EN6STP(20)4EFFTAB(94949)4RAEFTB(ll4ll) 

COMMON  CBMM4ENQTRQ4ENQFUL4ENQVAC4ENGSTT4ENQSTP4EFFTAB 

-DIMENSION  A(10)4C(10) . . . . - - 

COMMON  AiC4F0IDl4VACIDI,4N8PEED4NVEL4NTlMES4SPDINC«VCLINC4TIMINC 
COMMON  TFTBR04RIEPIF4CVTTRQ4 ISIM4TSNEW40SNEW4TSICDN4T91CO8 
common  RP4RPP4FOBHP4TCVTCS4TCLULS4RPMIN4RPMAX4TT4TC1TF 

-COMMON  RX8CAL4ENTeR04FDRAS4CQAIN4E0RAQ4RACFTB4RATKLS>DTF 
DIMENSION  GRATlOdO) 

-COMMON  GRArro4RMiN4RMAX4rctucM4cmci.- 

equivalence  (VAR(3)4GAIN) 

COMMON  /Shift/  RMlNASdO)4RMAXASdO) 

DIMENSION  QEREFFdO) 

COMMON  /EFFQER/GEREFF 
COMMON  /FlyEFF/PERlOS 

-DlMENSION“CCdO)4AAdO) “ 

COMMON  /SUMVAR/CC4AA 
COMMON  /QEORAI/AICVT 
COMMON  /DELAY/TBOTMS4TBDTW 
COMMON/ACCEIN/AEPA 
COMMON  /PR/VVDFN 

-COMMOST/ORINIT/INEXT  - — - 


C0MM0N27 

CBMM0N28 

C0MM0N29 

--C0MM0N30- 

C0MM0N31 

C0MM0N32 

C0MM0N33 

C0MM0N3A 

CBMM0N35 

-eOHMONSt- 


COMMON 
COMMON ■ 
COMMON 


COMMON 
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941  980  F9RMAT(H0) 

951  990  FSRMAT(9HTiME«/irt2iSX<7HT9UGR*«P6i3<aXi6HlQEAR«t  I2«2X«8HINEXT 

961  1 I8i2Xi7HlCLUCW»il2) 

97 1 ■ i000“FeRMAT(5HPA6N»iF5MX;5HT80N»#F9#2X<9HT9INf<rS#2X<SHT9lL*<rS.3) 
98|  1020  F9RMAT(5HPA9C«*F9/2X/7HT9ICDN«#F6/2X»6HT9ICfiFBj2X«SHT98C»#F5) 

99J  1030  F6RMAT(H*j48X<3HOF»«F6) 

601  1090  F9R'>1AT(6HVVDMJ»,F7j2X<6HvyiMI*,F6j2X«6HTVlMjnF6iJ«2X« 

611  " 1 7HSSTeRQ4iF9/2X/7HeNTBRQ*4et2«6«|X«7HTFTeRQi4E12>3«8X4 

62]  2 7HCVTTR0t*ei2»5) 

63]  1070“F6RMAT(4HQNU«iF4.3/2XigHVEPA«AF9.1/2X43HRPfiF9i2*  ' 

64]  1 2XA4HRP9>|F5i2i2X«2HR«<FSt2«2Xi5HAePAi«29i3/2X< 

69]  " ~2 9BVV0F»/EU.4#aX/68VVDFNt/En»*<8XA7HRATKL8»»E10*3) 

66t  • 

67]  ” PRINT  980’ ■ “ - . 

68]  PRINT  990«TlME/T9IlGR/ieEAR*lNEXTj ICUUCH 

691“  PRINT“1000iPA9NiT80N/T9INAT9IU  ' 

70]  PRINT  1020,PA8C<T9ICDN»T9IC#T99C 

71]  ■■  PRINT  1030iOF  . ■ . . 

72]  PRINT  l050iVVDMI/VVlMljTVlMJj5ST6RO<CNT9ROiTFT9R0«CVTTR6 

73]  ~ " PRINT“l020#0NU*VEPA/RP<RPP#Ri AEPAf*VVOF*VVDFN«RATKLS 

74]  RETURN 

791 END ■ 


••••  haefth  •••• 


It  • 

i\  SUBUeuTINE  SAEFFH 

3;  c»-—  SUSReUTINE  T8  C9MPUTE  REaB  AXLE  T8RQUE  LBS3 

A;  C---*  R.R.RADTKE  3/3/75  

5i  C6MM6N  SlE,TMAX,VACMAXi VVlMli VVILFR< VviEBRiVVliCDiVVlM/VVIlRF  C8MM8N01 

61  C8MM8N  VVIMDR«VVtORR*AVlB<AVIR,T81168<AVlM<yvlFUB4YVIFUS  CBMM8N02 ^ 

_ 7;  CBfireN  VVlgwB/VVISH^VVIAMXjVVIASiVVllCFiTVljCTiTVlJTRiTVlJRA  C6MM8N03 

8j  'C8MM8N  TVUTW/SCALEF/OELHlNiFUELWTiTlOLEiOT  CBMH8N0A 

9)  C9MM8N  NVEPAiRIEINV4HRPS£C/MAXLlN,EPS/NQEAH,iBUT4lPRNTiL8ADEQ  CSM^BNOB 

101  0iMENsiBrrT8iNVfin4iv£PAt3000) — C8mmbw-'6 

11!  0IMENS18M  VMIN(2!4VMAX(2)/VInT(2I»N01M(2)  C8M^'8N07 

■ 121  ‘ DIMENSIBN  DACCeNtl5)>ADCCBNU5r  - ' ' CBHfiBNOS 

13t  DIMENSiBCi  TVICRLU6)  CBMM8N09 

lAl  CBMMBN  T8INV  - - - _ --C9MPBN1Q 

ISI  CBMMBN  IVEPA/VM!N,vMAX4VINT4NDIH4DACC8N4A0CCBN4TV1CRL  CBMMBNH 

161  ^ CBMMBN^TIME/NRUN, iNDTCiNRECiNFUEl/tCLBCK/TCLBKOjTSiBB^BBHPjTBRO CBMPeNU 

17|  C8MMBN  SSTSRQiESOSTiPABC* PABN/PPBB/TABC^TASN  CBMM8N13 

18t'" "■  CBMMBN  T9IC4T9INjT80nI4T90C4T98N  CBMMBNIA 

19|  CBMMBN  TSIliTSIlQRjVVBSiVVBAjVYBDiAVIBiAVlSiTyiMjiVVDF/VVDMl/PABFRCBMMBNlB 

201  CBMMBN  FUELEi ITlCYCilCLBKl/ISMrFTiWHLSLPiWHLBLO,  ’ CBMM8N16 

211  CBMMBN  ICYEND/NLlNEi ICYCLEiNSIiNGlBLDjYEPAiYANALQjPABFROiVveAO  CBMM8N17 

22!  CBMMBN 'VYB304  delta, DEtT<  ISEQ,  rOBiESDBTO,  IGtAR CBMMBmB : 

231  EOUlVALEUCE  (DIST^yVBD), (BSiYYIBBR)  . CBMM8N19 

2Ai  OIMENSIBN  FT1ME(60|,E3PEE0160)4ATBROS(60)4YAR!10!4X(225)4NY81T(1B1CBMM9N20 

25|  OIMEnsIBN  yAL(2)4NLT(2)4NQT(2)4lP01«(80420)4lSPEED(20l4TIMMAX(8)  CBMMBN21 

26!  ■■  dimension  TIMLEN(5)4TIMAYQ(5)  'C8MM8N22 

271  CBMMBN  YAR4X4NV8LT,YAL4NLT4N0T4 IPOA4 l5PEE0iTIMMAX4TlMLEN4TlMAYa  CBMM8N23 

28!  EQQIYALENCE  'TFTIME(ir4X(A6‘5l4  (ESPEEDII)4X-(106)  )4(ATeRQ8tl)4Xtl66nCBMMBN2A 

29)  CBMMBN  lBLDl4lBlD24l6LD34lSWl4lSW24lSw34lENQNfl4lENGIN  CBMM8N25 

301  CBMMBN  ElNTRQ4FlNTR04RlF4RFlNR4DFDBTiQNU4FQNU4TR0IPL»T9ICD4R4DF  CBMMBN26 ' 

31!  OIMENSlBy  C8MM(26)4ENaTRa(20)4ENQFUL(20!4ENOVAC(20)4ENQSTT(20)  CBMMBN27 

32)  ‘ DIMENSIBN  ENGSTP(20)4EFFTABt94949!4RAEFTB(ll4ll)  C6MM8N28  

33)  COMMON  C6mM4£NGTR04£NQFUL4ENQVAC4ENG6TT4£NQSTP4EFFTAB  C6mmBN29 

34) dimension  A(io)4C(ior-: , — commshso 

35!  common  AiC4FUlDl4YACI0L4NSP££04NYEL4NTIME84SPDINC4VELlNC4TlMlNC  CBMM8N31 

361  COMMON  TFTOROiRIEPiF/CYTTaQ, I8IM4TSNEW4BSNEtf4T9IC0N4T9ICD8  CBMMBN32 

37)  COMMON  RP4RPP4FBBHP4TCYTlS4TCLUL64RPMIN4RPMaX4TT4TC<TF  . C0MM6N33 

381  common  RASCAL4ENTeR04FDRAa4Ea4IN4£DRA64RAEFTB4RATKLl»0TF  ' C6MMBN34 

391  dimension  QRATI6C10)  C8MM8N35 

“ 40!  C6MM0N“QBATlB-4RMIN4RMAX4lCLUCH4CVTSCL  - CBMMBN36 

411  • 

'■  42|  • 

43!  C----  CAR  In  neutral 

44!  T9I1  P 0*  . . 

451  IFUGEAR  « 1)  T98C  p T9IC/T9I1GRJ  RETURN 


46 

47 

48 

49 

50 

51 

52 

53 


* CAR  NOT  IN  NEUTRAL 
TRF»ABS(T9IC) 

TRpTRFpRJSCAL 

IF(TR  > 1000.0)  TR  • 1000. 0 

T9INL  • T9IN 

IF1T9IN  > 4000.0)  T9INL  ■ 4C00.0 

CALL  RAXLeS(TR4T9lNL4RAEFTB4RATKLS) 


r 

'f 


/ 
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• t # • • 

541  RATKL&'RATKLS/RASCAL 

551  C**"  C9HPUTE  efficiency 
5«|  TEMP»TRF»RaTKL8 

57J  • ■ 

591  IFITCMP  ♦ 0*0)  T9U  • TEHP/TRF 

9»t  * 

601  T9BC»(T9IC.RATKLS)*T9110R 

61J  RETURN 

6«l  END  


* • « • • 

U • , •***  RAXLBS  •••• 

2t  SU9RBUTINE  RAXLBS ( Ti S/ STRA« RAUS) 

9|  DIMENSION  TS<2)iSTRA(n«ll) 

' *1  * ■■  ■■ 

5J  1»<T/100)*1 

61  • 

71  IF(I  P 10)  I • 10 

81  • 

9|  IP«I*1  

lOi  ■"  'TPflOO*! 

Ill  _ TM  • TP«lO0*O  _ _ 

121  J»(S/400)ir 

131  • 

14|  ■■  IF(J  > 10)  J • 10 

15)  • 

16I  ' 5P»400»J 

17)  SM  a SPalOOtO 

18)  OB  1 MMfI,2  “ 

19|  MaJ*MM»l 

“201  1 TS(MM)avAL(TaTMiTP«6TRA(IiM)/8TRA(IPiM)) 

211  RALSaVAU(S«6M«SP«TS(l)«TS(2) ) 

22!  RETURN “ 

231  end  
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It  • 

JJ 

3l  • 

' >1 
Si 
61 
7I 
■ 8i 
91 
10] 
ni 

■ 121 

131 
16| 
151 
161' 
17l 
181 
191 
201 
211 

'221' 

23l 
261 
SSI 
261 
27! 

" 281 
291 
301 
311 
321 
331 
361 
35l 
361 
371 
381 
391 
601 
611 
621 
63J 
661 
661 
661 
671 
681 
691 
501 
511 

" ”‘"521 
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subrbutii^e  ROEPA 

READS  1N"EPA"0ATA' 
17  N9V  1976 


»•••  ROEPA  •*** 


C9MM0N  RjEiTMAX«VACHAX4VVlMliVVlLFR*VVI2BR/VVUCD< VVIM<VVI1RF  C6MMBN01 

"■  C9MMBN  VVlM0R<VVIDRR/AVIB«AVIB«T8115R/AVIM/VVIFUtJ*yviFUS  CBMUBNOS" 

CBMMBN  VVlS»iB<VVlSHiVVIAMX/VVlA5<VVllCF/TVJJCT<TVlJTRiTVlJRA  C6MMBN03 

■ ~C9MMBN  TYIjTWiSCAlEF,DELMlN/FUEUWT«DUMMY*OT— -C0MM8N  -ir“ 

CBMMBN  NVEPA»R:EINV<HRPSECjMAXLlN,EPSiNaEAR, IflUT* IPRNT* LBADEQ  CBMMBNOS 

"■  DIMENSIBN  T8INV(11)/ IVEPAOOOO)  CBMMBN  6" 

OIMENSIBN  YMIN(2)/VMAX(2)/V:nT(2)<NDIM(2)  CBMMBN07 

" DIMENSION  DACCBNtl5)»A0CCBNU6)  C6MMBN08“ 

DIMENSION  TVICRL(16)  COMMANDS 

CBMMBN  T8INV “ COMMBNICT' 

COMMON  IVEPAjVMIN#VMAXjViNT/NDlM<DACCBNjAOCCBN«TviCRL  CBMMBNll 

COMMON  TlMEiNRUN#INDICjNREC/NFUEL#ICtOCK< ICL8KOiTS/BS#BBHPiTORO  C0MM8N12- 

CBMMBN  SSTBRQ/ESOOTiPABC/PABNiPPBB/TAOCjTABN  C0MM8N13 

CBMMBN  T9lC<T9lNiT8DNjT98CiT9BN  . C0MMBN16 

COMMON  T9I;<T9IlQR,VV8SiVVOA,VYOD«AVie|AVlS4TYIMj/VVOF*VVDMl/PAOFRCOMM8N16 

- CBMMBN  FUELE« ITICYCi ICLBSli ISHIFTi WHLSLPi HHIBLO  , ‘ . Jl COMMONt®- 

C8MM8N  ICYENDiNtlNEi ICYCiEiNSIjNOIBLD/ YEPAi YANAL0#PA6FR04 VVBAO  CBMMBN17 

"COMMON  VVOSOiDELTA/OELT^lSEQjigO^ESOOTOiIQEAR  COMMONIO” 

EOUIVALENCE  (DIST«yY8D)i  (65/YYI0BR)  ..  . C0MMBN19 

"DIMENSION  FTlME(60)4E3PEED(60)4AT8R0S(60l4V6Rll0)4X(22S)4NY8UTtl8)C0MM8N20  ■ 
DIMENSION  VAU(2)iNl.T(2l#NaT(2)4lP0X(20420)4lSPEED(20)«TlMMAX(6)  C6MMBN21 

dimension ‘“TIMLENlSliTIMAYaiSl  ‘ --  T' - ~ C0MMBN2?“ 

COMMON  YlR/X^NVBLT/VAL/NuT^NQTi IPDX< ISpEED/TIMMAXlTlMLEN* TIMAYO  CBMM0N23 
equivalence  (FTIME(1)4X(66))4 (ESPEE0(11«X(106) l4 (AT0RQS(1)4X{166))C0MM0N26 
COMMON  ieLDl#IOL02#I8L034lSWl4lSW2/ISW3#IENONO>IENeIN  C8MMBN26 

CBMMBN  EINTRQ/FINTRQiRlFiRFlNRjDFDOTlQNUiFGNUiTRQlDLiTSICD^R^DF  C8MMBN26 

DIMENSION  C8MM(a6)4ENQTRQ(20)iENQFUL(20)4ENQVACI20l»ENQSTT(20) 

DIMENSION  ENQSTP(20)iEFFTAB(949>9)/RAEFTBtll4in  ' 

COMMON  COMMiENQTROiENQFUL/ENQYAC^ENQSTT^ENGSTPiEFFTAB 
DIMENSION  AtlO)jC(lO) 


COMMON  AiCiFUIDL/VACIDLiNBPEEO/NYEL/NTIMESiSPDlNC/VELlNC^TIMINC 
CBMMBN  /EPASH/  VCRUS< ACEL>DECCL< TA4TC4 TD* T1DLE< TE* RTLNOT 

common/stops/nstop 

■REAL  ILN3THitTlME/LTA<CTCjUTD - ■ ~ - 

ACEL- acceleration (mPH/SEC) 

YCRUS. CRUISING  VELBCITY  MPH 

DECEL-DECELERATIBN  FT/SEC«*2  bn  InPUTj  MPH/SEC  bn  OUTPUT  IN  EPASH 
NSTOP. number  of  stops  per  mIle 
■ RTLNQT-R8UTE  LENGTHtMILEsr  

TA  time  acceleration  STOPS 

TC  time  cruising  stops 

TD  time  decelerating  STOPS 
TIDLE-TIME  at  bus  stop 
TE6TIME  for  one  cycle  »TIDLE+TD 
DLNQTH-lENQTH  of  Each  CYCLE(MIlES) 


C8MMBN27 

C6MM0N88- 

C0MM0N29 

C6MM8N30- 

C8MM8N31 
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• * • • 

54| 


55 

56 

■ 57 
SB 

69 
60 
61 
68 
63 
66 

65 

66 

67 

68 

■ 69 

70 

71 
78 

73 

74 

75 

76 

77 

78 

79 

80 
81 
88 

83 

84 

85 

86 
“87 

88 

'89 

90 

91 
98 

93 

94 

95 

96 

97 

98 
“99 

100 

101 

108 

103 

104 

105 

106 


100 

980 

990 

1000 

1008 

1003 

1004 

1005 

1006 

1007 

1008 
1010 
1015 
1080 
1085 


rBR1AT(3F8.3« I8,8F8.3) 

FORMAT(/) 

F9RMAT(l7HtPA  DATA  FBLLBWSJ J 

FORMAT ( 5X4 5HACCEl4  4Xi6HCRUISE<SX4SH0E;CEL#18X<BHBU&  ST8P«8X< 

1 8HNB  STBPS«4X«6HLENGTH) 

FORMAT  (3X/9H(MPH/SEC)  4 3Xi5H(MPHW  3X*  10HFT/'SEC/8EC<  1 1X<  BH  ( SEC 
1 10H(PER  MIUE>/3X«7H(MILE8)) 
format ( 3Fl0t 3#F20.3< :10<F10*3) 

format (BX,2HTA<8X,2HTCi8X/8HT0<7X/3HDTD«8X#2HTE«8X*8HN0‘  STOPS 
F0RMAT(5(5X;3H(SEC) I<3X*7H(T0TAL) I 
FORMAT(6FlOt3) 

FORMAT  (7X/3HUTA4  7Xi3HUTC>  7X4  3HLTDi4X«6Hll.NQTH<5Xi6HlTIME«BXj 
1 5HTIMAX) 

F0RMAT(6Fl0f3) 

F0RMAT(Xil3(I7#8Xl4l7)  " ' 

F0RMAT(6BNVEPA«4l5) 
format (16H**END  EPA  DATA*#) 

F0RMAT( 'RDEPAI  EXCEEDS  3000  VALUES’) 

READ  100iACELiVCRUS«  DECEL4NSTBP4RTLNQT4TIOLE 

■ PRiNr  950 

PRINT  990 

PRINT  980  

PRINT  1000 
PRINT  1002 

PRINT  10034  ACEL4VCRUS4DECEL4TIDLE4NST8P4RTLNaT 

“NTOTAL"*  TST0P8‘»  NST0P»RTCN8T 

OLNOTH  ■ 1.0/FL0AT(NST0P| 

CONVERTS  DEC6L  TO  MPH/SEC 
DECEL  • DecEt»15. 0/82.0 
TA»VCRUS/ACEL 

oto«vcrus/deceu 

TC'  r-o.5»(PTO»OTO»DECEL“*‘T’A»TA*ACEU 

TC  • (3600.0»0LN0TH  -TO/VCRUS  4 TA 

TO»TC*DTO  - . - 

TE  » TO  * TIOLE 

PRINT  980  ■ 

PRINT  1004 

■ PRlNr  1Q08 

RRINT  IOO64  TA4TC4TO4OTO4TE4T8TOPS 

ILNQTH  t NTOTAL*DLN0TH 
ITIME  ■ NT0TAL4TE' ' 

TIMAX  • TSTOPS»TE 

LTA- 4 0.5»ACEL4TA»TA/3600.0  — - 

LTC  • LTA  t VCRUS»(TC»TA)/3600.0 
LTD  • LTC  * 0.5«0ECEL*OTD»DTO/3600.0 
PRINT  980 
PRINT  1007 

PRINT  IOO84  LTA4LTC4LTD4ILNQTH4ITIME4T1MAX 

■ PRINT"  980 


>48X4 
) 
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107J  RVCL  . OiO 

1081  PTIME  » 0,0 

1091  OS  5 I • 1,3000 

1101 iVEPA'd)-"  0 

111!  5 continue 

IIZ!  • . . 

1131  06  32  I P l,NT8T*l*l 

114J  TR  • FL8*T( I )«TE 

115]  TU  • TR  • TE 

116)  10  'CONTINUE 

1171  IPTITE  « PTITE  i PTIME  • l.O 

11*1  ‘ TUTIME  • PTIME  . TU  . 

lUl  • 

' ‘ 120!  • terminate  ip  PTIME  EXCEEDS  TJMAX 

1211  IP(PT1TE  > TIMAX)  08  T6  33 

1221 '•  ■ - - - - 
1231  CAUL  EPACAUC(RVEL, TUTIME) 

1261  ‘ “"KPLACE  • iPTIME/'2  " 

1251  KREM  • IPTIME  • 2*kPU8CE 

1261'  IFfKREM  < 11  IVEPA(KPLACE)  i NV£L*6096  * ITEMPl 

1271  ITEMPl  . NVEL 

128J  IFTPTIME  * 1,0  6 TRTSB  TB'IO  

1291  32  continue 

' 1301  • 

1311  33  continue 

1321  , - - 

1331  IFIKREM  » 0)  I VEPA ( KPlACE ) • ITEMPl 

1361  '• 

I3!i  NVEPA  » PTlME  ♦ 1,0 

1361  NN'»  NVEPA/2  ' ' ' " 

137}  PRINT  1015, NN 

1381  ' PRINT'  980 

139)  IF(NN  > 3000)  MRIT£!102,1025)iwRITEI108il035nPAuSE 

1601  K"V'  0 ^ 

lAlt  DO  60  J * 1,NN,1* 

1*2|  ■ ' ‘ X P X ♦ 16  . 

1*31  IF(K  > NW)  « ■ NN  . . 

1661  ' PRINT  lOlOi  tlVEPidli  IPJPKI 

1*5!  60  continue 

1*61  PRINT"980 

167!  PRINT  1020 

168!  RETURN 

1*91  END 
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1|  • ••••  READRA 

2J  SUBRBUTINE'READRA(STRA) 

3|  0IMENS18N  STRA(U<in 

A1  1000  rBRMATdllfJtSV  

51  tool  F6Rf1AmX#UR7i2( 

6t  09  I J»UU 

7|  READ  1000« (STRA|l<J)<lFl<ll) 

8|  RRINT  lOOli (SrRA(!<J)iIil«ll) 

Jj  I CONTINUE 

dOI RETURN" 

111  END 


IJ  • treffh 

21  SUBROUTINE  TREFFW  ( T9RQi SPEED# IGEAR#TCL6S<GRAT19 ) 

}|  dimension  QEREFF(IO) 

41  -COHMSN  /EFFGER/QEREFF 

5l  DIMENSION  ORATIO(IO) 

6;  IF  (IQEAR)  4#4#11 

7i  11  continue 

8)  EFF»GEREFF(IGEAR> 

91  IF(T0R0)1#2#B 

101  I TCl.SS»(TeRQ.(TORO/EFF)  )»0BAT10(1QEAR) 

111  GO  TO  3 

121  2 TCLSS»T0RQ«(1«EFF)*QRATI0CIQEAR) 

13l  3 continue 

14|  toro»toro.tcuss  ^ 

15t  return 

161  ■ "H~TCLSS«0" 

171  RETURN 

181  "END  ^ 


It  • ••••  TURKEY  •••• 

2|  subroutine  TURKEY(STAR)  " " 

31  C«*»*»6UBR0UTINE  TO  READ  THE  ARRAY  ISTAR'  FROM  HYDROSTATIC  POWER  SPLIT 

A|  C TRAl!iSMISSI0N"T0RQUE’L06S“DATA  CARDS 

51  C»**««TOM  HAUSENBAUER  5/1975 
61  DIMENSION  S7AR(9#7<9)  ' 

71  C»»**»READ  TORQUE  LOSS  DATA  CAROS 

8]  DO  1 K p 1#9’  ■ 

»J  DO  1 I p 1#9 

101  “ READ  Sr  (STAR!  J#J#K)#  JP1/7I 

111  PRINT  2#  (STAR(I#J#K),JPl#7) 

12|  1 continue  • ■ ■ 

131  8 F0RMAT(7F10*2I 

141  '■  ' RETURN  “ 

151  END  


It  • VAU  ***• 

2|  function  VAL(X#Xl#X2/Yl#Yai 

li  VALp(X«X1)p(Y2*Y1)/(X2«X1)pY1 

41  Return 

51  END 


••••  TQQ15H  •••* 
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a 

3 

4 

5 

6 

7 

8 
9 

10 
11 
12 
IS 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 
47l 
481  C-- 
49!  • 
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51!  • 
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SUBSBUTPNE  T0Q15H 

...  SUBROUTINE  T9  DETERMINE  EFFECTIVE  BEAR  AXLE  RATle  AND  D.St  SPEED 

— DAN  KAPEULEN  10/73 “ 

MODIFIED  21  DEC  1976 

MAX  RANOE  9F  T8INV!  40  MPH  * 

C9MM9N  RlE/TMAX/VACMAX<VVlMljVVILFR/Vvi28R«VVliCDiVVlMiVVIlRF 
C9MM9N  VVIM0R*VVIDRR/AYIB«aVI8<T8I18R/AVIMjVVIFuM«VV1FuS 

C9MM8N  VVISWB,VVISH<VVIAMXyVVIAS«VVIlCF<TVlUCT>TVruTRiTVlJRA  

C9MM9N  TY1UTW*SCALEF«0£LM1N/FUELWT/T1DLEjOT 
" C9MM9N  NVEPAiRIEINV/HRPSEC/MAXl.IN*EPS4N0EAR,  ieuT*IPRNTilBADEO  ' 
DIMENSI9N  T8INV(11)< IVEPA(3000I 
DIMENSION  VMIN(2)iVMAX(2)<VlNT!2)jN0lM(2} 

DIMENSION  DACC0NI15)«ADCCSN(19> 

DIMENSION  TVICRK16I 

COMMON  T8INV 


COMMONOl- 
COMMONOa 
'COMMONOS^ 
COMMON04 
COMMONOO" 
COMMON  6 
C0MM0N07- 
C0MM0N08 
-COMHONOr" 
COMMONIO 
'COMMONir 
C0MM0N12 
C0MMON13" 
C0MM0N14 


COMMON  IVEPAiVMINjVMAX<VINT#NDIM#OACCeNiAOCCON,TViCRL 
COMMON  T1ME#NRUN» lNDICiNREC<NFuEL* ICLOCX* ICLOKO«TSiBS* OBHP* TORO 
COMMON  SSTBRQ/ESD0TjPAOC/PAONiPPOB<TAec«TAON  “ 

COMMBN  T9IC/T9IN<T8DN/T98C/T90N  . - 

“'COMMOKI  T9li,T9IlSRiVVBS<VVBA<VV0DiAVIO«AVlS4TVIMjj’VVDF/VVDMl/P»BFRCOMMONt5 
COMMON  FUEUEi ITICYC4 IClOKli ISHIFTjWHLSLP/WHLOLO  . C0MM0N16 

“COMMON  ICYEND^NUINE/ ICYCuE^NGIjNOIOLDi VEPA4VANAiaiPA0FR0<VVeA0 C0MM0N17 

COMMON  VYOSOiDELTAiOELT/ISEQ/IOa'ESDOTOilOEAR  C0MM0N18 

“EQUIVALENCE  (DIST< yVOO)* IBS/VVIBBR)  C0MM0N19 

DIMENSION  FTIME(6O)<ESPEED(6Oj4ATOROSl6O)4VAR(lO)4Xt226)4NV0LTU6)COMMON2O 

"“OIMENS I ON  VAL“(  2 ) 4 NLTT2 ) t NOrt  21  i I PDXT20j  20  > J I SPEED  ( 20 ) /TI MMAX  f 51 COMUSNBt 

DIMENSION  TIMLEN(5)4TlMAVfl(8)  CBMM0N22 

COMMON  V*RiX4NV0LT,VAL4NLT/NSTiIPDX4l6PEED4TIM|1AX4TlMlENiTIMAV8  C0MM0N23 
equivalence  (FTIMEtl )4X(46) )4 (ESPEE0(ll4X(l06))4 (AT0R0S(1)4X(166) )C0MM0N24 


■ COMMON  ieLDl4l0LD24l0LD3#ISWl4lSW24lSw34lENQN04lENBIN 
COMMON  EINTR04FInTR04RIF,RFINRjDFD0T4QNU4FQnU4TR0IPL4T9IC04R4DF 

DIMENSION  CBMM(26)4ENGTRDt20)4EN0FUL(20)4CNgVAC.(20)«EN58TTt20)— 

DIMENSION  ENQSTP(20)4EFFTABt94949)4RAEFT8tll4ll) 

COMMON  COMMiENQTRQiCNQFUL/ENQVACiENQSTTiENOSTP/EFFTAB 

DIMENSION  A(lO)iCdO)  . . , 

COMMON  A4C4FUIDL4VACIDL4N6PEED4NVEL4NTIME34SPDINC<VELlNC4TIMlNe- 
common  TFTBRQ4RIEPIF/CYTTR04ISIM4TSNEW4BSNEw»T9ICDN4T9ICD8 

COMMON  RP/RPP/FOBHPiTCVTLS/TCLULSiRPMINiRPMAXjTTiTC/TF  - — 

common  RASCAL/ENTeR04FDRA94EQAIN4E0RAO,RAEFTBiRATKL84DTF 
DIMENSION  GRATIOUOI 
common  GRaTIO/RMIN^RMAX/ ICLUCHiCVTSCL 
EQUIVALENCE  (V/VVOSJ 

... “THIS'SUBROUTINE  DETERMINES  A“tC0RRECTE0'  DRjvESHAFT  SPEED  AND  AN'  “ 
...  'EQUIVALENT'  rear  axle  RATIO  BASED  ON  A TABLE  fiF  D8IVESHAFT  SPEED 
...  AS  A FUNCTION  OF  VEHICLE  SPEED  OBTAINED  FROM  EXPERIMENTAL  DATA* 

THE  PROGRAM  variables  ARE  AS  FOLLOWS* 

INPUT  VARIABLES 

“VVOS-... VEHICLE  SPEED'. “ - 

OUTPUT  variables 


C0MMQN20- 
COMMON26 
-C0MMON27- 
CeMM0N28 
COMMONSJ- 
CBMM0N30 
C0MM0N31 
C8MM0N32 
^ C0MM0N33- 
C0MM0N34 
CBMM0N3B 
CBMM0N36 


E-  55 


« » 

• 

54; 

C- 

551 

C- 

S6t 

• 

■■  571 

c- 

581 

c- 

59| 

c- 

601 

• 

611 

c- 

621 

c- 

631 

c- 

641 

c- 

66) 

c» 

661 

• 

671 

c- 

681 

• 

■ 891 

701 

711 

c- 

721 

• 

731 

74( 

• 

751 

761 

c- 

■ 77l 

78} 

791 

601 

811 

c» 

821 

831 

4 

841 

85J 

• 

881 

871 

■-.T91N-.--'C8RRECTE0i  DRJVESHAFT  speed  TAKINQ  INT9  account  tire  SRONTH. 
••  T9J1QR-. -equivalent  REAR  AXLE  RATIO# 

PROGRAM  CONSTANTS 

■ •'T8INV(U)-TABLE  OF  DRIVESHAFT  SPEEDS  AS  A FUNCTION  OF  VEHICLE  SPEED. — 
■•••  T8IIGR— NOMINAL  REAR  AXLE  RATIO. 

VVIORR---TIRE  RADIUS. 

. OTHER  PROGRAM  VARIABLES 
...  T80N-.. -UNCORRECTED  DRIVESHAFT  SPEED. 

T8DNHI--UPPER  InTERBOLATION  ORIVESHAFT  SPEED. 

..-.TSDNLO-rtOtfER  interpolation  DRIVESHAFT  SPEED.  

DIFF difference  BETWEEN  CURRENT  VEHICLE  SPEED  AND  VEHICLE 

— SPEED  AT  LOWER  INTERPOLATION  POINT. 

calculate  THE  UNCORRECTED  DRIVESHAFT  SPEED. 

convert  fro((  mph  to  RPM 

IA.00S65  • (5280/60)»(1.0/2Pl)  "' — 

T8DNI1A.00S65*  V «T8I IQR/VVIORR 

test  IF  THE  VEHICLE  SPEED  EXCEEDS  THE  RANGE  OF  THE  TABLE.  

rF(  V'  »OT.  AO.O)  T9IN  • T9UQR*T8DN/T8UQRJ  RETURN  


JJ  i VAOfl'^  ^ ~ — 

DETERMINE' THE  ORIVESHAFT  SPEEDS  AT  THE  UPPER  AND  LOWER  INTERPOLATION  POINT 

' - - 

TaONHI»T6lNV(JAl) 

T60NL0»T8lNy  (J)  ' ' “ 

DIFF  . V ■ lO.O«UJ 

'■•t“TNTERPOL*TE~TABLE  FOR  CORRECTED  ORIVESHAFT  SPEED.  

T9INiT80NL0*.l»DIFF*(T8DNHI»T80NL0>  _ 

IFIT9IN  »LE.  O.il  T9I1QR  • TBIlQRj  RETURN 
BTHERWISEI  ■ ■ ■“ 

T9I10R  • T8I1QR*T9IN/'T8DN<  RETURN 

END - 
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••••  VtDYNH 


It  • 

2|  SUeReuTlNE  J/EDYNH 

31  C----  SUBR9UT1NE  T9  SIMULATE  VEHICLE  ACCELERaTI9N  AND  BRAKIN5  DYNAMICS 
<♦:  C»--«  OAN  KAREUtEN  10/73  


6!  C9MM9N  RlE, TMAX« VACMAXi VViMl i VV ILFR< VV I E0R/ VVI ICO* YVIM< VV I IRF  C9MM8N01 

7l  C9MM9N  VVlMDR»VVIDRR/AVlBiAVIR«T8I15R/AVlMiyvlEUM*yVIFU6  CBMM9N02 

6)  C9MM9N  WISWBiVVISHiVVIAMX/VVIAS/WIlCfiTVIjCTiTVIJTRjTVIJRA  C9MM9N03 

?|  C9MM9N  TVIjTW/SCAL£E/DELMlN<FUELWT#TIDLEiOT  . . CBMMBNOA 

10i‘“  — C9MM9N  NYEPAiRIEINV/HRPSEC4MAXLlN/EPSjNQEAR,I9UT*IPRNT/L9ADEQ  ‘CBMMBNOB* 

ll:  dimension  TSINVaiXtVERAOOOO)  C9MM9N  6 

121  DIMENSION  VMIN(2),VMAX(2)/VINT(2)«ND1M(2)  CBMMON07' 

13l  DIMENSION  DACCeN(15)<ADCC0N(19)  C0MMSN08 

I4i  DIMENSION  TVICRL(16)  'COMMONOJ- 

15?  COMMON  T8INV  COMMONIO 

16?  COMMON ■IVEPA/VMINjVMAX<VINT/NDIM,DACC0NjAOCCON,TviCRL  ‘ XOHMONlt 

17l  COMMON  TlMEiNRUNi InDIC<NREC/NFUEL< ICLOCK* ICl9KO»TS#BS<O0HPjTORQ  COMM0N12 

18?  ^ COMMON  SST9RQ<ESD0T<PABC<RABN<PP8B<TA0C<TA0N  C0MM0N13 

191  COMMON  T9IC<T9IN<T8DN<T90C<T90N  COMMONIA 

20l  ■■■COMMON  T9ll,T9IlGR,VVB5<VV0AjVV0D<AVl0<AVlS4TVlMj<VVDF<VVDMl<PABrRC8MM0N18^ 

21?  COMMON  FUElE< 1TICYC< tCLOKl< ISHIFT<WHLSLP<mHl0LD,  C0MM0N16 

221 CeMMON-lCYEND<NLlNE< I CYCLE< NQI < NQI 0LD< VEPA< YANALS< PABFRO< WO AQ—  -COMMOMIT— 

23?  COMMON  VVBSO<DELTA<DELT<ISEQ<I0O<ESDOTO<I2EAR  C0MM0N18 

24? equivalence  (OIST<VV0O)<  (BS/VVIBBR)  ...  , CBMMONIJ-- 

25?  DIMENSION  FT IME ( 60 ) < ESPEED ( 60 ) < AT0R06 ( 60 )< V^R ( 10 ) < X ( 22S ) < NVOLT ( 16 )COMMON20 

26?  ■ -DIMENSION  VAL(2)<NLT(2)<NQT(2)<IPDX(20<20)iISPEED(20)<TIMMAX(B)  CBMM0S81- 

27?  DIMENSION  TIMLENl5)<TIMAva(5)  _ C6MM0N22 

281 X0M'1BN'^AR4X<NVeLT/VAL'<NLT>N0T<IPDX<  ISPEED<TlMf1AX4TlMLEN<TIMAY0  'COMMONtS 

29?  equivalence  (FTIME(1)4X(46) )< (ESPEE0(l)<X(l06n4 (AT0RQS(n<X(164) IC6MM0N24 

30? ■ -■  COMMON^IOLD1<IBLD2<10LO3<  ISW14  ISW2<  ISW3<  IENGN0<  lENOlN  C0MM0N29 

31?  common  EINTRQ<FINTRO<RIF<RFINR<DFD6T<QNU<EQNU4TROIDI<T9ICD4R<DF  C0MM6N26 

321  DIMENSION  CSMM(26)<ENQTRQ(20)4ENQFUL(20)<ENgVAC(20)4ENQSTT{20)  COMMON27 

33?  DIMENSION  ENGSTP(20)<EFFtAB(949<»)<RAEFTB(11<11)  C0MM0N28 

34  i COMMON  ■C0MM4ENGTR0<CNGFULVENQVAC<EN5STT<ENfl8TP<CFFTAB  - -CBMMONSS- 

35?  dimension  A(10)<C(10)  . C0MMBN30 

36;  ■ ■ COMMON  A4C<FUIDL<VACIDL<NSPEEO4NVEL<NTIME6<SPDINC4VELINC<TIMINC  C0MM0N31' 

371  COMMON  TFTBR0<RIEPlF<CVTT8Q4lSIM4TSNEW<BSNEy4T9ICDN4T9ICD0  CBMM0N32 

38?  COMMON  RP4RPP<FeaHP4TCVTLS<TCLULS<RPMlN4RPMAX4TT<TC<TF  C0MM0N33 

39?  common  RASCAL<ENTeRO<FDRAQ<EGAlN<EORAG<RAEFT8<RATKLS<OTF  C0MM0N34 

'401 DIMENSI0N“GRATI0  (10) ■ ■ ■ - -CBMM0N3S- 

41?  common  QRAT10<RMIN<RMAX<1CLUCH<CVTSCL  C0MM0N36 

42?  E0U1VAUENCE(VAR(3)<0AIN<0ELTAT) 

43?  COMMON  /PR/VVDFN 

44?  EQUIVALENCE  (V<WOS) 


45?  • . . 

i*6?’'C---4^IS“SUBR0UTTNE  DETERMINES  THE  VEHICLE  ACCELERATION  BASED  ON  THE  — 

47?  C»-»-  DIFFERENCE  BETWEEN  THE  FORCE  DRIVING  THE  VEHCLE  AND  THE  RESISTIyE 

48?  C--«»  FORCES#  IT  ALSO  TESTS  FOR  CONDITIONS  OF  TIRE  SPINNING  OR  SKlOOlNfli 

49?  • * ••INPUT  VARIABLES.- 

501  C-*.-  VVOS.  vehicle  SPEED  (MPH)t 

511  C."-»  T90C-REAR  AXLE  OUTPUT  TORQUE  (FT-lB)* 

52i  C---w^'VV16BR  OR  BS-BRAKE  SETTING  (0‘TO  11  , - — 

53l  C**..  TBOIQR-TRANSMISSION  GEAR  RATIO  SQUARED# 


• 4 • • 

541  C — - 


55 

56 

57 
56 

59 

60 
61 
62 

■ 63 

64 

65 

66 

67 

68 
“69 

70 

71 

72 

73 

74 
"75 

76 

■ 77 

78 

79 

80 
81 
82 

83 

84 

85 

86 
^87 

88 

89 

90 
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92 
"93 

94 

95 

96 
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98 
“99 
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101 
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"105 
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C- 

c*— 

• 

c»*« 

c»-* 

c— 

• 

C... 

C... 

C.-4 

c.— 
C-  — 

c*— 

c*— 

c»»» 

c— 

c»?* 

Ci--» 

C-.. 

C— t 
C*>"? 

C-.. 

c»»* 

C"«T 

« 


• T911QR-E0UIVALENT  HEAR  AXLE  RATIO# 

■ AVIS. WIND  SREED  (MPH) 

> GRADE  angle  (RAD) 

>-euTPur  variables-.  - 

. VVOA-VEhICLE  acceleration  (Hph/SECI 

• VVDF. VEHICLE  ROAO'LOAO  FORCE  AT-'TIRE  ROAD  INTERFACE 

• WHLSLP.  USED  IN  R«  T#  SIMULATION  TO  CONTROL  TIRE  SLIP  NOISE  QENERATeRt 

> .program  constants..  ■ _ 

• VVIM. vehicle  mass  (LB). 

r'WlLFR.FRONTAL  AREA' (SQ. 'FT. ) i‘ 

r VVIICO-ORAQ  COEFFICIENT. 

• VVIIRF. COEFFICIENT  OF  ROLLING  FRICTION.  

- VVIFUM-COEFFICIENT  OF  STATIC  TIRE  FRICTION  (Q«S). 

■ VVIFUS. COEFFICIENT  OF  SLIPPING  TIRE  friction  (G!S). 

• WIMAX.MAX  VEHICLE  ACCEL  (Q'S).  CALCULATED  IN,  INCNH8 

."VVIAS.MAlf  vehicle 'ACCEL'WITH-HHEEL  8PIN(0»8).  CALC.  IN  INCNHB 

• VVI2BR. brake  constant., (lB)* 

> TVIJCTiTVIJTRiTVIJRAiTVIJTW., POLAR  MBmeNT  OF  INERTIA  OF  TORQUE  

• converter  TURBINE^  TRANGMlSSIONi  REAR  AXLE«  AND  REAR  WHEELS 

f RESPECTIVELY(LBM-FT#*2).  " . 

■ LOADEQ-A  USED  IN  A LOGICAL  MANNER  TO  TO  DETERMINE  WHETHER 

•'LOADEQ.  USEO'TO  DETERMINE  "IF  ROAD  LOAD  EQUATION : IS  OF  TABLE, IS  USED? 

■ OTHER  PROGRAM  VARIABLES * 

• SINAVO.SlNE  APPROXIMATION  FOR  GRADE  ANGLE.  

• TVIMJ. total  rotary  inertia  of  DRIyETRAIN  REFLECTED  TO  REAR  WHEELS# 

• VVDFBR.  TOTAL  RESISTIVE  FORCE  ACTING  ON  VEHICLE  INCLUDING  BRAKES.  

. VVDFN.NET  FORCE  AVAILABLE  TO  ACCELERATE  VEHICLE. 

rVYOMI.TOTAtTTNSRTTAt'MASS'OF-VCHlCLE  (G'S).  ' — 


C.' 

C.—. 

C...f 


APPROXIMATE  GRADE  ANGLE  TO  AVOID  USE  OF  SINE  FUNCTION. 

S iNAVOi AVIS* (1..AV!0*AVI 0/6.) 

■ "'WHLSLP^Ot 

40  CONTINUE  . , 

i»'  IF“LOADEO"IS“l'<"USE“  R9AtrtOAO~EQUATION.-  IF  ZERO  USE  DtS.  TOROUE"TAtL*'.- 
IFILOADEOIAB. 45.46 
66  I • V/lOtO  * 1.0  ' 

T912..97 

- -REM  • V.(I.1»*10«D  ' 

0RT0RK.TVICRL(I)a(TV1CRL(I+1).TV1CRL(I) )«REM/10. 

" " VVDF.DRT0RK*T9I10R*T9I2/VVIDRR ” ' 

GO  TO  47 
66  CONTINUE 

WAV  » V ♦ AVIS 

VV0F..033.g94.VV I ICD.VV I LFR» AV1M.VVAV.WAV  * 

2 VVIlRF.VV:M*a.*VVllCF«V>*VVIM.SlNAVe 

4r  CONTINUE"  “ . -- 

..  ADO  RESISTIVE  FORCE  TO  BRAKING  FORCE  TO  OBTAIN  TOTAL  RESISTIVE  FORCES. 
FOR  the  hybrid  CAR  THE  BRAKING  FORCE  19  INCLUDED  IN  T90C 
VVDFBR. VVDF  . . 

OBTAIN  NET  FORCE  AVAILABLE  TO  ACCELERATE  THE  VEHICLE. 
VV0FN.T90C/VVIDRB.VVDFBR  , . 

CACCUCATETO^OTAL  ROTARY"  INERTIA  OF  THE  ORIVETRAIN  AS  SEEN  AT'THr— " 
REAR  wheels. 
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341 
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411 
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SU8RBUT1NE  VEOYNH 

SU8R8UTINE  T8  SIMULATE  VEWIClE  ACCELERATISN  AND  BRAKING  DYNAMICS 
OAN  KAPEUtEN  10/73  ' 


CBMMBNOr 
CBMMBN02 
CBMM0NO3 
CBMMBN04 
■C8MMBN08" 
C8MM8N  6 
CBMMBNOr 
CBMM6N08 
“CBMMBNO?" 
CBMMBNIO 
-CBMMSNlt- 
CBMMBN12 
CBMM8N13  - 
CBMMBN14 


CBMMBN  RJE,TMAX< VACMAX« VVlMliVVlLFRj VVl28R<VVliCOiYVlM< VVIlRP 
CSMMBN  VVlMDR/VVlORR»AYlBiAVIRiT8IlQRyAVlM#yVIFUM*yVlFUS 
C8MMBN  VYigwB<VVlSHiVVIAMX,VVIAS*WIlCE'<TVljCT,TVlJTRiTVI  JRA 
CBMMBN  TVIJTW<SCALEF<DELMIN<FUELWT<T1DLE<0T 

'CSMMBN  NYEPA<RIEINV<HRPSEC<MAXLlN<EPS<NaEAR,IBUT<IPRNT<L8ADE0 
D1MENSI8N  T8INV(11)<IVEPA(3000) 

DIMENSI8N  VMlN(2)<VMAX(2)<VlNT(2)<N0lM(i) 

0IMENSI8N  DACCeNll5)<A0CCBN(lS) 

OIMENSISN  TV1CRL116) 

CBMMBN  T81NV 

CSMMBN  "I  VEPA<VMIN<VMAX<  VINT<  ND-IM<DACC8N<  A0CC6N<  TV  iCRL 
CSMMBN  T1ME<NRJN< INDIC<NREC<NFUEL< ICLBCK< ICLSK0<TS<BS<88HP<T8RQ 
CSMMBN  SST8RQ<ESD8T<PABC<RA8N<PP9B<TA8C<TA6N 
CBMMBN  T9I;<T9lN<TgDN<T98C<TSBN 

C6MM9N  T9ll<T91lGR<VV85<VV8AjVYSD<AVlB<AVlS4TYiMj<VVDF<VVDMl<PABF*CBMMflN18— 
CSMMBN  FUElEj 1TICYC< tCLSKl< ISHIFT<WHLSLP<wHL8L0.  C8MMBN16 

-t:8MM8N“ICYEND<NL-1NE<  :CYCLE<NQl<NaiSLD<VEPA<  YANALG<PA8FPC<  VVSAO CSMMSNtT — 

CSMMBN  VV8S0<DELTA<DELT<ISEQ<IGS<ESD6T0<I3EAR  CSMMBN18 

equivalence  (D1ST<VV8DJ< (BS<VVI8BR)  . _ . CBMMBNtJ— 

OIMENSISN  FTIME(60)<ESPEED(60)<AT8R06UO)<V4R(10)iX(225)<NVSLT(15)CBMM9N20 
'OIMENSISN  VAL(2)<NLT(2)<NQT(2)<IPDX(20<201JISPEE01EO)<T1MMAX!5)  CBMM8S81- 

DImENSISN  TIML£N(5)<TIMAva(5)  . C6MM8N22 

-CSMM8N-i/AR<X<N'V8LT<VAL:<MT>NQT<  1P0X<  lSPEE0<TIMf1AX<TlMLEN<TIMAY0  -CSMMBNW— 

equivalence  (RTIME(1)<X(46) )< ( ESPEEO ( 1 1 <X ( 106 )) < ( AT8RQS ( 1 )< X ( 16* nCBMMBN24 
CBMM9N“I6LD1< IBL02< I8LD3< ISWl< ISW2<ISW3<1ENQN8<1ENGIN  C6MMBNS8 

CSMMBN  El NTRQ<FINTRQ<R1F< RF1NR<0FDST<QNU< RQNU<TR0I0L<T91CD<R<DF  C8MMBN2* 

DIMENSION  CSMM{26)<ENQTRQ(20)<EN3FUL(201<EN8VAC(20)<ENQSTT(20)  C8MMBN87 

OIMENSISN  ENGSTP(20)<EFFT*B(9<9<9)<RAEFTB(11<11)  CBMMBN28 

-C8MM8N  'CSMM-<ENGTRQ<ENQrUL"<ENQVAC<ENG8TT<ENa8TP<CFFTAB -CSMMBNt^ 

dimension  AtlO)<C(lO)  . CSMMBN30 

CSMMBN  A<C<FUI0L<VACIDL<NSPEE0<NVEL<NTIMES<SPD1NC<VELINC<TIM1NC  CBMMBN31- 

CSMMBn  TFTBRQ<RIEPIF<CVTTBQ<IS1M<TSNEW<BSNEH<T9ICDN<T9ICDS  C8MMBN32 

CBMMBN  RP<RPP<F6BHP<TCVTLS<TCLULS<RPM1N<RPMAX<TT<TC<TF  CSMMBN33 

CSMMBn  RASCAL<ENT8R0<FDRAG<EQAIN<EDRAG<RAEFTB<RATKLS<0TF  CBMM6N34 

“DlMENSlBN^GRATle  tlO) “ -- - -CSMMBNSe— 

CSMM8N  QRATIS<RM1N<RMAX<1CLUCH<CVTSCL  C9MMBN3* 

EQUIVALENCE (VAR (3) <QA1N<DELTAT1 
CSMMBN  /PR/VVOFn 

EQUIVALENCE  (V<VV8S1  


461 ‘Cm--*"THIS“SUBRBUT1NE  DETERMINES  THE'  VEHICLE  ACCELERaTIBN  BASED  8N  THE  — 

47|  C»-»*  difference  between  the  FBRCE  DRIVING  ThE  VEHCLE  AND  THE  RESISTIVE 

48!  C*-«»  FBRCES#  IT  ALS8  TESTS  FBR  CSNOITISNS  BF  TIrE  SPINNInO  8R  SKIOOINGi 

49!  • ' *-lNPUT  variables.* 

50!  C*-**  VV9S.  vehicle  SPEED  fMPH)« 

511  C**.-  T98C-REAR  AXLE  BUTPUT  T8R0UE  (FT-lB)* 

321  C*-'iA~VVIBBR 'SR  BS-3RAKE  SETTING  (0T8  11  . - _ 

53l  C*..«  TBBIQR.TRanSMISSISN  gear  RATie  SQUARED! 
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C-..-  T911QR-E0UIV4LENT  REAR  AXLE  RATJOt 
C-...  AVIS. WIND  SREED  (MPH) 

C....  GRADE  AnQLE  C’AD) 

• -••euTPUT' variables-.  - 

c....  VVBA. vehicle  ACCELERATIBN  (MPH/SEC) 

c.-..  VVDF-VEHlCLe  RBAD'LSAD  FBRCE  at- tire  R8AD  INTERPaCE  U-Bli 

C>...  WHLSLP.  USED  IN  R«  Ti  SlMULATIBN  TB  CONTROL  TIRE  SLIP  NBISE  QENERATBRi 

• ..PROGRAM  constants..  - _ 

c--..  VVIM. vehicle  mass  ILB). 


VVILPR'FRONTAL  AREA' (SO.  FT.li 

c.-.t  vviicd-drag  coefficient. 

c....  VVllRF-COEFFICIENT  8F  ROLLING  FRICTION. 

C...f  VVIFUM-COEFFICIENT  OF  STATIC  TIRE  FRICTION  (G»S). 

C. 

C-- 


VVIFUS'COEFFICIENT  8F  SLIPPING  TIRE  FRICTION  (OJS). 
VVIMAX. MAX, VEHICLE  ACCEL  (G'S).  CALCULATED  JN  INCNHB 


C,. •t-'VVIAS. MAX' 'vehicle 'ACCEL"WITH"WHEEL  SPlNIOtS).  CALC.  IN  INCNHB 

c—  VVI2BR. brake  constant. . (LBI I 

C...»  TVIJCT«TVIJTR.TVIJRA,TVIJTW.  POLAR  MOMENT  OF  INERTIA  OF  TORQUE  

C....  converter  turbine,  transmission,  rear  axle.  AND  REAR  WHEELS 

C...T  REBPECTIVELY(LBM-FT#*2I.  " . . ' 

C.—  LOAOEQ-A  USED  IN  A LOGICAL  MANNER  TO  TO  DETERMINE  WHETHER 

C.—  'LOADEQ. -USED'TO  DETERMINE 'IF  ROAD  LOAD  EQUATION : IS  OF  TABLE, 15  USEO^ 

C-...  OTHER  PROGRAM  VARIABLES 

C«...  SINAVO»SlNE  APPR8XIMATI8N  FOR  GRADE  ANGLE.  , 

c-.-.  TVIMJ. total  rotary  inertia  of  DRIYETRAIN  REFLECTED  TO  REAR  WHEELS. 

C..."  VVDFBR-  TOTAL  RESISTIVE  FORCE  ACTING  ON  VEHICLE  INCLUDING  BRAKES.  

C...T  VVOFn.NET  force  available  to  accelerate  VEHICLE. 

C4H4»-W0MI.T0TA[rTNBRTTAtrMASS'0F-VEHICLE  (3»S).-  ' 

# 

C....  APPROXIMATE  GRADE  ANGLE  TO  Ay#io  USE  OF  SINE  FUNCTION. 
SlNAVO«AVlB»(l..AV!0«AVlO/6.) 

WHLSLP«Ot  - 

40  continue  . , 

■C.-i»“IF“LOADEO"IS"l'."USr  ROAO^COAD^EQUATION.-  IF  EERO  USE  D.S.  1’OROUE'TAtLt-.- 
IF(LBADE0)46. 45.46 
66  I • V/l0»0  * l.O  -- 
T9I2..97 

- -REM  • V.(I»l>«l0»0 

0RT0RK»TVICRL(I)A(TVICRL(l4l)-TVICRL(I ) )*REM/10. 

VV0F.DRT0RK*T9I10RPT9I2/VV1DRR"" — ' ' 

GO  TO  47 
46  CONTINUE 

WAV  » V ♦ AVIS 

VVDF..033.e94»VVIlCD«VVlLFR*AVIM*yVAV*VVAV  * 

2 VVIlRF*VVIM*(l.*VVllCF«y)*VVIM»SINAyo 

— 4r  CONTINUE'": 

C...«  ADO  RESISTIVE  FORCE  TO  BRAKING  FORCE  TO  OBTAIN  TOTAL  RESISTIVE  FORCES. 
C....  FOR  THE  hybrid  CAR  THE  BRAKING  FORCE  IS  INCLUDED  IN  T90C 
VVDFBR.VVDF  . , 

C— .f  obtain  net  force  available  to  accelerate  THE  VEHICLE. 

VVDFN.T90C/VVIDR8. VVDFBR  . . 

C-...  calculate  TO -TOTAL' ROTARy-TNERTl A OF  THE  ORIVETRAIN  AS  SEEN  ATTWr 

C....  REAR  WHEELS. 
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1071 

loai 

109: 

1101 

ms 

113! 

113: 

1141 

115: 

“lur 

117: 

IIBI 

119S 

130t 

13U 

'I23J 

123: 

124: 

125: 

126: 

127: 

i28r 

129: 

1301 

131: 

132t 

133: 

■'■‘134:’ 

135; 

136: 

137: 

138: 

139; 
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T9I  « T9UQR*T9I10R 

reeioR  • r^r  , , . , . 

TVIMJ.(TVIJCT*TVIJTR)*TB51QR*T91  ♦ TVIJRA#T91  * TVIJTW 

c--^*  DSTERMlNE’THe  INERTIAL  MASS"3F^HE- VEHICLE.  ' 

VVIDRRSQ  • W10RR*VVI0RR 

VVDMI  * (VVIM  * TVIHJ/yVIDRRS0)/32.l739  — - 

Cf-»«-0ETERMlNE  vehicle  ACCElERATJSN. 

VV8A*VVPFN  /VVDMI  “ ' ” ~ 

• 

C*-»"~OETERMIj!irTr'THERE  HRr  ANY^9NSTRAlNTS  5N  THE  CALCULATEO^  ACCCLERATt9N 

• 

IFTVVBA)  5W50.52  7 , - 

C>»*f  IF  ACCEL  IS  NEQATIVE  CHECK  IF  TIRES  ARE  SKIODINO. 

51  IF  (VV8A/32.1739*VVIFUM)“5B#56<56  ' " ‘ — 

55  C8NTINUE 

WMLSLP*-!. — 

VV8A««VV1FUS«32.179  . 

C*-»«  IF'TIRES  ARE' SKIDDING  SET' DECEL  T8  THAT  BCCURRINO  UNDER  SLIDING  CBNDtTlBNS  

56  CGNTINUE 

c*—*  ENSURE  VELBCITY  WiLLr  NBT' BECBME  NEGATIVE  DURING  NEXT-TlME  STEP.  

IF(V  «VV9AtDELTAT«.6eiSl8)S9«59«S0 

59'  WBA^T-iV/DECTAT 

RETURN  ... 

C-*»-  F8R  PBSITIVC^ACCEL  DETERMINE  IF  WHEELS  ARE  SPINNING.  

52  IF  (VvOArVVIAMX«32.1739)  50«50i6E 

■■'■62  CBNTINUE  “ 

WHLSLP«»1. 

C'ii-iV-'IF-WHEELS~ARE"  SPINNING  SET“ACCEC"TB  MAX  P8SSIILE  UNDER  SLIP. 

VV8A>VVIAS«32.1739 
50  CONTINUE 

C.—»  CHANGE  VEHICLE  ACClERATISN  FR8M  FT/8EC/SEC  T8  MPH/SEC. 

VV8A»VV8A#, 681818 
RETURN 

tNa — — - ■ 
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• ••••  WINDUP 
SU5RBUTINE  WINDUP 

r“9'FEBRgARY“X977  “ ’ ' ~ 

• ... 
C8MM8N  RIE<TMAX,VACMAX<VV1MI<VV1LFR<VVI2BR/VVI1CDjVVIM<VVI1RF 
CBMM8N  VVlMDR<VVIDRR*AVlB#AVIRiT8I10R/AVIM<VVIFUt!l4VVlFUS 
COMMON  VYISwB#VV!SH#VVIAMXiVVIASiVVI1CFjTV1jcT,TV1UTR*TVIJRA 
C0MM8N  TVIuTW<SCALEF#DELM1n»FUELWT/TIDLEjOT 

COMMON  NVEPAiRIElNViHRPSECiMAXtlNjEPS* NOEAR, lOUT, IPRNT^UOADEQ  “ 

dimension  TSlNVdD#  IVEPAOOOO) 

DIMENSION  VMIN12I,VMAX(2),VINT(2),N0IM(2) 
dimension  DACCeNll5)«ADCC0N(19) 

— dimension  TVICRL(16I 

COMMON  T8INV 

COMMON"!  YEPA,VMIN,VMAX,VINT<NDIM,DACCeNiADCCBN,TVICRL 

COMMON  T1ME,NRUN,!NDIC*NRECjNFUEL, ICLOCK, ICUOKOi TS, BS« OBHP, TORO 

“ COMMON  SSTORQ#ESDBT*PAOC,PAON,PPOe,TAOC«TAON 

COMMON  T9IC,T9IN,T8DN,T99C,T90N 


CBMMONOl' 
C0MM0N02 
C0MMBN03‘ 
C0MM0N04 
— C0MM0N05- 
COMMON  6 

"--commonot- 

C0MMBN08 
C0MMBN09  ■ 
COHMONIO 
— -COMMONtl- 
C0MM0N12 
C0MM0N13-- 
C0MM0N14 


CeMM0N'T9Il,T9IlQR,VV0Si VVOA, VVeD,AVIe^AVI6,TyIMJ,VV0FiVVDMl#PA8rRC0MM0N15- 
C0^1M8N  FUELE/ITICYC# ICUOX1,ISH1FT,WHLSLP<WHlOLO.  . C0MM0N16 

CeMMBN"ICYEND,Nl,!NE*  ICYCtEiNGI/NOlOLD,  VEPAi  YANALG<PA0FR0»VV0A0 COMMONl?- 

COMMON  VVOSOiDElTA,DELT,ISEQ<I60,ESOOTO*IQEAR  C0MM0N18 

EQUIVALENCE  ( DI ST, VVOD) < (B5« W I6BR ) , . C0MMBN19 

DIMENSION  FTIME(60)iESPEED(60),ATOROS(60)/V6R(10),X(2251,NVOLTll5)COMMON20 

DIMENSION  VAL(2)iNLT(2),NQT(2)<IPOX(20,20)#lSPCED(20J»TlMMAX(5)-  -C0MM0N21- 

DIMENSION  TIMLEN(5)<TIMAVQ(5)  . C0MM0N22 

COMH0N"VA8,X#NVBLTiVAL,NLT>NOT<IPDX,ISPEED,TIMMAXiTIMLEN,TIMAV(J— COMMONST" 

EQUI valence  (FTIME(1)|X(46) )< ( ESPEED ( 1 1 j X U06 1 )« ( ATORQS 1 1 ) , X ( 166 1 IC0MM0N24 

COMMON ■ lOLDl/ I0LD2, IOL03, I8W1, ISW2, ISw3< IENQNO, lENGlN  ‘ 'COMMONSB' 

COMMON  ElNTRQ#FINTR0,RlF,RFlNR,DFD8T*GNU<PQNUjTR0IPLiT9ICD,RiDF  C0MM0N26 

DIMENSION  CBMM(a6),ENQTRQ(20l,ENQFUL(20)<ENeVAC,(20)<ENQ6TT(20)  C0MM0N27 

DIMENSION  ENGSTP(20)/EFFTAB(9i9,9|*RAEFTB111,11)  C0MM0N28 

C0MM8N"C0MM,ENGTR0/ENQFaL>ENGVACiENGSrr,ENQSTP,eFFTAB COMttONg»“ 

dimension  A(10)«C(101  . ... 

COMMON ■AiC,FUIDL«VACIDL/N8PEEDiNVEL,NTlMES,9PDINC|VELINC, TIMING  C0MM0N31- 

C0MM8N  TFTORQiRIEPlF,CVTTRQ< ISIM,TSNEW,BSNEw,T9ICDN<T9ICD0  C0MM8N38 

» .....  

1000  F0RMAT(H1«6/«49HFuEL  EXPENDED  TO  REV  UP  FROM  EPS  TO  EN08TP  AT  TtO* 

— • — t 5Mr-roEL-E-i#-P7.B,rASHLBr - 

I 

0T2  • 0T/2i0  - ■ ■ — - - - - 

PAOFRO  t FulDL 

lENQIN  • 2 ■ — 

RFINR  • I.o/RIEPIF 


REPEAT  10,  WHILE  DF  < ENGSTP(l) 

FlNTRO  f FSPEED(ENQTRQ,NSPEED,SPDINC4PA0N«800,0) 

OBHP  • FINTR0*PA8N/6252*0 

PAOFR  ■ FSR£ED(ENGFULiNSPEED,SP0iNC#PA0N»80Ot6)*OBHP 
FUELE  • FuELE  * IPAOFRO  W PA8FR I *0T8»HRP6EC 

PAOFRO  ■ PAOFR  

CALL  ENGWHL 
10  CONTINUE 

PRINT  1000,FUELE 

RETURN" 

END 
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